问题
填空题
以下程序用来产生20个(0,99)之间的随机整数,并将其中的偶数打印出来。请填空。
Private Sub Command1_Clcik()
Randomize
For I=1 To 20
X=Int(Rnd*______)
If X/2=______Then Print x
Next I
End Sub
答案
参考答案:Int(X/2)或X\2
以下程序用来产生20个(0,99)之间的随机整数,并将其中的偶数打印出来。请填空。
Private Sub Command1_Clcik()
Randomize
For I=1 To 20
X=Int(Rnd*______)
If X/2=______Then Print x
Next I
End Sub
参考答案:Int(X/2)或X\2