单选题
有如下程序:
Private Sub Form_Click()
Dim i As Integer, Sum As Integer
Sum=0
For i=2 To 10
If i Mod 2=0 And i Mod 3<>0 Then
Sum=Sum+i
End If
Next
Print Sum
End Sub
程序运行后,单击窗体,输出结果为( )。
A) 12 B) 30 C) 24 D) 18
A
B
C
D
【正确答案】
C
【答案解析】
[解析] 本题程序段的作用是将从2到10中是2的倍数但不是3的倍数的数求和然后输出。在2到10中满足条件的数字是2,4,8,10,所以和是24,故本题的正确答案是选项C)。
提交答案
关闭