问题
单项选择题
设有如下程序：
Private Sub Command1_Click()
Dim sum As Double，x As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
Next i
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+1，n值为3，则Sum值为1/2+2/3；以此类推，直至循环结束。最后Sum的值应为1/2+2/3+3/4+4/5的结果，所以正确答案为C)。