2. 计算机
  3. 有Click事件对应的程序如下： Private Sub Commandl_Click() Dim sum As Double．x As Double sum=0 n=0 For i=1 To 5 x=n／i

有Click事件对应的程序如下： Private Sub Commandl_Click() Dim sum As Double．x As Double sum=0 n=0 For i=1 To 5 x=n／i

admin2020-06-06  32
问题 有Click事件对应的程序如下：
    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 i
    End Sub
    该程序通过For循环计算一个表达式的值，该表达式是(    )。
选项 A、1+1／2+2／3+3／4+4／5
B、1／2+2／3+3／4+4／5
C、1+1／2+1／3+1／4+1／5
D、1／2+1／3+1／4+1／5
答案B
解析 本题考查了For循环控制结构的应用，本题中循环共执行了5次，每次各变量赋值情况如下表所示：
    i x n  sum
    1 0／1 1 0
    2 1／2 2 1／2
    3 2／3 3 1／2+2／3
    4 3／4 4 1／2+2／3+3／4
    5 4／5 5 1／2+2／3+3／4+4／5
    循环结束后，sum最后的值为1／2+2／3+3／4+4／5，故选择B选项。
转载请注明原文地址:https://jikaoti.com/ti/X4o0FFFM
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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