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

设有如下程序： Private Sub Commandl—Clickl[) Dim sum As Double，x As Double Sum=0 n=0 For i=1 To 5 x=n／i

admin2021-09-06  57
问题 设有如下程序：
    Private Sub Commandl—Clickl[)
    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，所以累加上去的是O／l；第二次循环时，i=2，n=1，x=1／2，所以累加上去的是1／2；第三次循环时，i=3，n=2，x=2／3，所以累加上去的是2／3；循环5次后累加的应该是0／1+1／2+2／3+3／4+4／5。
转载请注明原文地址:https://kaotiyun.com/show/n3vp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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