数列求和:sn=1+1/2+1/3+…+1/n,求sn

问题描述:

数列求和:sn=1+1/2+1/3+…+1/n,求sn

Sn-Sn-1=an=1/n。

该数列没有求和的简便公式!!!

这是调和级数,除了逐项相加外,只有近似的求和公式为:
Sn~ln(n)+c,c为欧拉常数0.577...

Function sum(byval n as long)
dim f as double
dim i as long
for i=1 to n
sum=sum+1/n
next i
End Function