以下程序的功能是:生成20个200~300之间的随机整数,输出其中能被5整除的数并求出它们的和。请填空。 Private Sub Command1 _Click( ) For i = 1 To 20

admin2009-03-15  26

问题 以下程序的功能是:生成20个200~300之间的随机整数,输出其中能被5整除的数并求出它们的和。请填空。
       Private Sub Command1 _Click( )
          For i = 1 To 20
               x=Int(【  】*200+ 100)
               If【  】 = 0  Then
                     Print x
                     S = S +【  】
               End If
          Next I
          Print "Sum = "; S
       End Sub

选项

答案Rnd ,x Mod 5 ,x

解析 在循环中利用Rnd函数得到1个介于0~1之间的小数,再转换为200和300之间的整数,并保存在变量x中。利用Mod函数判断x是否能够被5整除,如果可以,则将x累加到变量S中求和。
转载请注明原文地址:https://kaotiyun.com/show/NJ1p777K
0

最新回复(0)