问题
填空题
下面程序的作用是利用随机函数产生10个100～200之间(包含100、200)的随机数，打印其中是5的倍数的数，并求出它们的总和。请将下列程序补充完整。
Private Sub Command1_Click()
For m=1 To 10
x=Int(Rnd *______)
If Then
Print x;
k1=k1+x
End If
Next m
Print"k1=";k1
End Sub
答案
参考答案：101+100；x Mod 5=0
解析： 本题考查Rnd函数的应用。Rnd函数产生[0，1)之间的双精度数，若要利用Rnd函数产生[a，b]范围的整数，可通过Int(Rnd*(b-a+1)+a)方法来实现，因此第一个空白处应填“101+100”。如果产生的随机数x Mod 5表达式为0，那么输出统计结果，因此第二个空白处应填“x Mod 5=0”。