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