问题 单项选择题

设有如下程序:
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
End Sub
该程序通过For循环计算—个表达式的值,这个表达式是_________。

A.1+1/2+2/3+3/4+4/5

B.1+1/2+2/3+3/4

C.1/2+2/3+3/4+4/5

D.1+1/2+1/3+1/4+1/5

答案

参考答案:C

解析:[评析] 本题考查循环语句,其过程如下:
i=1时,x=0/1=0,n=0+1=1,sum=0+0;
i=2时,x=1/2,n=1+1=2,sum=0+1/2;
i=3时,x=2/3,n=2+1=3,sum=0+1/2+2/3;
i=4时,x=3/4,n=3+1=4,sum=0+1/2+2/3+3/4;
i=5时,x=4/5,n=4+1=5,sum=0+1/2+2/3+3/4+4/5。

填空题
单项选择题