[填空題] 下列程序的功能是：單擊窗體時將隨機生成10個1～100之間的數(shù)，求出它們的總和及平均數(shù)。請?zhí)羁铡? Option Base 1 Private S
2021-07-20
[填空題] 下列程序的功能是：單擊窗體時將隨機生成10個1～100之間的數(shù)，求出它們的總和及平均數(shù)。請?zhí)羁铡?/p>
Option Base 1
Private Sub Form_Click()
Dim a(10)As Integer,i As Integer
Dim sum As Integer,aver As Single
【12】
For i=1 To 10
a(i)=Int(100*Rnd)+1
sum=sum+a(i)
Next i
【13】
Print sum,aver
End Sub
正確答案：[12]Randomize [13]aver=aver／10
參考解析：本題首先定義了一個具有10個元素的數(shù)組a，然后通過For循環(huán)給該數(shù)組的每個元素賦一個隨機數(shù)，并把該數(shù)加到變量Sum中。For循環(huán)執(zhí)行后，用總和除去元素個數(shù)就得到平均值。要產(chǎn)生隨機數(shù)，可先使用Randomize進行隨機數(shù)初始化，所以[12]處應填“Randomize”。循環(huán)過后應求平均值，故[13]處應填“aver=aver/10”。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。