设有如下程序: Private Sub Command1_Click() Dim sum As Double, x As Double sum=0 n=0 For i=1 To 5

admin2010-09-11  27

问题 设有如下程序:    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。
转载请注明原文地址:https://kaotiyun.com/show/hNmp777K
0

最新回复(0)