[填空題] 下列程序的功能是：?jiǎn)螕舸绑w時(shí)將求出隨機(jī)生成的10個(gè)兩位數(shù)中的最大數(shù)及其下標(biāo)，請(qǐng)?zhí)羁铡?/p>

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 10

a(i)= 【12】

Next i

max=a(1)：max_i=1

For i=1 To 10

If 【13】 Then

max=a(i)

max_i=i

End If

Next i

Print max,max_i

End Sub

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

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