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

admin2013-01-23  29

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

答案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://jikaoti.com/ti/x9O0FFFM
0

最新回复(0)