约数个数shlqsh

【题目描述】

       定义f(x)为x的约数个数，x为正整数。

       求=f(a)+f(a+1)+……+f(b)，即a,b之间每个数的约数的总和。

 

【输入数据】

       从shlqsh.in中读入数据。

       一行两个正整数a、b，以一个空格隔开。

 

【输出数据】

       向shlqsh.out中输出数据。

       一行一个整数，即答案。

 

【数据范围】

       对于50%的数据，1≤a≤b≤1000；

    对于100%的数据，1≤a≤b≤10,000,000。

 

【输入输出样例】

shlqsh.in

shlqsh.out

2 6

13

var
 i,n,j,m,k,ans:longint;
begin
 readln(n,m);
 for i:=1 to m do
  begin
   k:=m div i;
   j:=(n-1) div i;
   ans:=ans+k-j;
  end;
  writeln(ans);
end.