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

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

admin2021-04-07  48
问题 有Click事件对应的程序如下：
Private Sub Command1_Click()
  Dim 811111 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://kaotiyun.com/show/eNSp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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