选择题
39.
设有如下程序:
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、
0/1+1/2+2/3+3/4+4/5
D、
1/2+1/3+1/4+1/5
【正确答案】
C
【答案解析】
[考点] 本题考查VBA中循环结构的知识。
这类问题需要分析出每一次循环所做的操作。第一次循环时,i=1,n=0,x=0/1,所以累加上去的是0/1;第二次循环时,i=2,n=1,x=1/2,所以累加上去的是1/2;第三次循环时,i=3,n=2,x=2/3;所以累加上去的是2/3;循环5次后累加的应该是0/1+1/2+2/3+3/4+4/5。
提交答案
关闭