问题
单项选择题
设有如下程序:
Private Sub Command1_ Click()
Dim sum As Double, x As Double
sum=0
n=0
For i=1 To 3
x=n/i
n=n+1
sum=sum+x
Next i
End Sub
该程序通过For循环来计算sum的值,sum值的精确结果是( )。
A.1+1/2+2/3
B.1+1/2+1/3+1
C.1/2+2/3
D.1/2+1/3
答案
参考答案:C
解析: 第一次循环时n、sum均为0,所以sum值为0,第二次循环时n为1、i为2,所以sum值为1/2,第三次循环时n为2、i为3,所以sum值为1/2+2/3。