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

admin2009-01-15  23

问题 设有如下程序:    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

答案4

解析 本题考查循环语句,其过程如下:
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/2g2p777K
0

最新回复(0)