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

admin2012-03-22  35

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

解析
转载请注明原文地址:https://jikaoti.com/ti/1xO0FFFM
0

最新回复(0)