单选题
设有如下程序: 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/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。
提交答案
关闭