[填空題] 下面程序的作用是利用隨機函數(shù)產(chǎn)生10個100～300(不包含300)之間的隨機整數(shù)，打印其中是7的倍數(shù)的數(shù)，并求它們的總和。請?zhí)羁铡? Sub TO
2021-07-20
[填空題] 下面程序的作用是利用隨機函數(shù)產(chǎn)生10個100～300(不包含300)之間的隨機整數(shù)，打印其中是7的倍數(shù)的數(shù)，并求它們的總和。請?zhí)羁铡?/p>
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
Print a(i)
s=s+a(i)
______
Next i
Print "S=";s
End Sub
正確答案：a(i)＝Int(Rnd() * 200+100) a(i)Mod 7＝0 End If
參考解析：根據(jù)題意，隨機產(chǎn)生100～300之間的10個數(shù)，存入數(shù)組a，因此應(yīng)調(diào)用Rnd函數(shù)，故填a(i)=Int(Rnd*200十100)。用來判斷數(shù)組中的元素是否能被7整除，應(yīng)填a(i) Mod 7=0。用來結(jié)束If語句，應(yīng)填：End If。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。