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

admin2019-02-19  41

问题 下列程序的功能是计算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/K20p777K
0

最新回复(0)