1968: [Ahoi2005]COMMON 约数研究

1968: [Ahoi2005]COMMON 约数研究

Time Limit: 1 Sec  Memory Limit: 64 MB
Submit: 1127  Solved: 852
[Submit][Status][Discuss]

Description

Input

只有一行一个整数 N（0 < N < 1000000）。

Output

只有一行输出，为整数M，即f(1)到f(N)的累加和。

Sample Input

3

Sample Output

5

HINT

 

Source

Day2

 

题解：一个神题（HansBug：其实一开始看到别人的AC代码一个个才几百B有点被吓到了），其实我们可以逆向思维想这个问题，不要老想着小学学奥数时候学会的数字的约数个数公式，那样子只会添乱，只需要考虑各种不同的约数对于答案的贡献程度即可，即[N/I]（设约数为I），然后没了，可以当作水题了= =

/**************************************************************
    Problem: 1968
    User: HansBug
    Language: Pascal
    Result: Accepted
    Time:88 ms
    Memory:220 kb
****************************************************************/
 
var n,m,ans:int64;
begin
     readln(n);m:=n;ans:=0;
     while m>0 do
           begin
                inc(ans,n div m);
                dec(m);
           end;
     writeln(ans);
     readln;
end.