下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数，打印其中是7的倍数的数，并求它们的总和，请填空。 Sub TOF() Randomize Dim S As Double Dim a(10

admin2012-12-08 63

问题下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数，打印其中是7的倍数的数，并求它们的总和，请填空。
Sub TOF()
Randomize
Dim S As Double
Dim a(10)As Integer
For i=0 To 9
Next
For i=0 To 9
If Then
Ptint a(i)
S=s+a(i)
Next i
Print
Print“S=”：S
End Sub

选项

答案a(i)=Int(Rnd()*200+100) a(i)Mod 7=0 End If

解析

转载请注明原文地址:https://www.kaotiyun.com/show/KVhp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类