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

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

admin2019-06-28  38
问题 设有如下程序：
    Private Sub Commandl_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 1
    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=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://jikaoti.com/ti/sto0FFFM
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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