下列程序的功能是计算 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
热度🔥551
参考答案:A
解析:
【解析】本题中利用For循环语句与If条件判断语句完成计算 1 到 1000 之间所有偶数之和。首先利用For循环使i从1至1000逐个变换,若i为偶数,则执行相加操作,因此应在If语句空白处填写i Mod 2 = 0。