问题
单项选择题
设有如下程序：
Private Sub Command1_Click()
Dim sum As Double，x As Double
sum=0
n=0
Fori=1 To 5
x=n/i
n=n+1
sum=sum+x
Nexti
End Sub
该程序通过For循环来计算一个表达式的值，这个表达式是( )。
A．1+1/2+2/3+3/4+4/5
B．1+1/2+1/3+1/4+1/5
C．1/2+2/3+3/4+4/5
D．1/2+1/3+1/4+1/5
答案
参考答案：C
解析： 变量Sum和n的初始值都为0，在进行第一次循环时，x=n/i(i=1)，结果为0，n=n+1， n值为1，Sum=Sum+x，Sum值为0；在进行第二次循环时，x=n/i(i=2)，x的值为1/2，n=n+1，n值为2，则Sum值为1/2；第三次循环十，x-n/i(i-3)，x的值为2/3，n-n+l，n值为3，则Sum值为1/2+2/3：依此类推，直至循环结束。最后Sum的值应为1/2+2/3+3/4+4/5的结果，所以正确答案为C