[填空题] 以下程序的功能是:生成20个200~300之间的随机整数,输出其中能被5整除的数并求出它们的和。请填空。 Private Sub Command1 _Click( ) For i = 1 To 20 x=Int( 【11】 *200+ 100) If 【12】 = 0 Then Print x S = S + 【13】 End If Next I Print "Sum = "; S End Sub
正确答案:[11]Rnd [12]x Mod 5 [13]x
参考解析:在循环中利用Rnd函数得到1个介于0~1之间的小数,再转换为200和300之间的整数,并保存在变量x中。利用Mod函数判断x是否能够被5整除,如果可以,则将x累加到变量S中求和。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)