2. 计算机
  3. 设有如下程序： Private Sub Command 1_Click() Dim sum As Double，x As Double Sum=0 n=0 For i=1 To 5 x=n／i n=n

设有如下程序： Private Sub Command 1_Click() Dim sum As Double，x As Double Sum=0 n=0 For i=1 To 5 x=n／i n=n

admin2013-10-28  67
问题 设有如下程序：
    Private Sub Command 1_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 i
    End Sub
    该程序通过For循环来计算一个表达式的值，这个表达式是(    )。
选项 A、1+1／2+2／3+3／4+4／5   
B、1+1／2+1／3+1／4+1／5
C、1／2+2／3+3／4+4／5
D、1／2+1／3+1／4+1／5
答案C
解析 本题考查VBA中循环结构的知识。这类问题需要分析出每一次循环所做的操作。第一次循环时，i=1，n=0，x=0／1，所以累加上去的是0／1；第二次循环时，i=2，n=l，x=l／2，所以累加上去的是1／2：第三次循环时，i=3，n=2，x=2／3，所以累加上去的是2／3；循环5次后累加的应该是0／1+1／2+2／3+3／4+4／5。
转载请注明原文地址:https://www.kaotiyun.com/show/5yrp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)