下列程序的功能是计算 1 到 1000 之间所有偶数之和,程序空白处应填写的语句是 Private Sub Command_Click() Dim x As Double For i=1 To 1000 If

admin2021-06-03  30

问题 下列程序的功能是计算 1 到 1000 之间所有偶数之和,程序空白处应填写的语句是
  Private Sub Command_Click()
      Dim x As Double
      For i=1 To 1000
          If _______ Then
              x = x + i
       End If
     Next i
     Debug.Print x
  End Sub

选项 A、i Mod 2 = 0
B、x Mod 2 = 0
C、i Mod 2 <> 0
D、x Mod 2 <> 0

答案A

解析 本题中利用For循环语句与If条件判断语句完成计算 1 到 1000 之间所有偶数之和。首先利用For循环使i从1至1000逐个变换,若i为偶数,则执行相加操作,因此应在If语句空白处填写i Mod 2 = 0。
转载请注明原文地址:https://kaotiyun.com/show/8nvp777K
0

最新回复(0)