Question

用VB编写一个Sub子程序,计算并输出 x=1+1/2+2/3+3/4+4/5······99/100

Answer 1

Sub JiSuan

Dim x,y,i

x=1

For i=2 To 100

y=i-1/i

x=x+y

'''按需要怎么输出..

Next

End Sub

选我啊