选择题
13.
窗体上有一个名为Command1的命令按钮,并有如下程序:
Private Sub Coramand1_Click()
Dim a(10), x%
For k=1 To 10
a(k)=Int(Rnd*90+10)
x=x+a(k)Mod 2
Next k
Print x
End Sub
程序运行后,单击命令按钮,输出结果是______。
A、
10个数中奇数的个数
B、
10个数中偶数的个数
C、
10个数中奇数的累加和
D、
10个数中偶数的累加和
【正确答案】
A
【答案解析】
Rnd()函数表示产生一个0~1之间的随机数。所以题中Int(Rnd*90+10)产生的随机数是[10,100)之间的整数,让该数对2取余,若为奇数则得1,若为偶数则得0,对于表达式“x=x+a(k)Mod 2”中x加上0对表达式的取值无影响,若加上1则表示有一个奇数。
提交答案
关闭