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

admin2012-12-08  36

问题 下面的程序的作用是利用随机函数产生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://jikaoti.com/ti/MLO0FFFM
0

最新回复(0)