问题
单项选择题
设有如下程序： 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。