题目内容:
下面程序的作用是利用随机函数产生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
参考答案:
答案解析:
下面程序的作用是利用随机函数产生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