[填空題] 下列程序的功能是：單擊窗體時將求出隨機生成的10個兩位數(shù)中的最大數(shù)及其下標(biāo)，請?zhí)羁铡?Option Base 1 Private Sub Form_Click() Dim a(10) As Integer，i As Integer Dim max As Integer，max_i As Integer Randomize For i=1 To 10a(i)= 【12】 Next i max=a(1)：max_i=1 For i=1 To 10If 【13】 Then max=a(i) max_i=iEnd If Next i Print max,max_i End Sub

[12]Int(90*Rnd)+10[13]max＜a(i)

本題通過一個循環(huán)給數(shù)組的各個元素賦一個兩位隨機數(shù)，兩位數(shù)的范圍為10～99， 產(chǎn)生的隨機數(shù)公式是：Int((99-10+1)*Rnd)+10。求一維數(shù)組的最大值及其下標(biāo)的方法是：首先認為第一個元素a(1)最大，并用一個表示最大值的變量max記下它，用一個表示最大值的下標(biāo)變量max_i記下它的下標(biāo)1。然后用最大值max和后面的每個元素比較，如果后面的元素值大，則用max記下它，用max_i記下它的下標(biāo)。故[13]處應(yīng)填“max＜a(i)”。