单选

设有如下程序:      Private Sub Command1_ Click()         Dim sum As Double, x As Double         sum=0         n=0         For i=1 To 3            x=n/i            n=n+1            sum=sum+x         Next i      End Sub 该程序通过For循环来计算sum的值,sum值的精确结果是(  )。

  • A.1+1/2+2/3
  • B.1+1/2+1/3+1
  • C.1/2+2/3
  • D.1/2+1/3
参考答案
您可能感兴趣的试题
¥

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服