[填空題] 閱讀程序：

Option Base 1

Private Sub Form Click()

Dim a(3)As Integer

Print "輸入的數(shù)據(jù)是；"；

For i==1 To 3

a(i)=InputBox("輸入數(shù)據(jù)")

Print a(i)；

Next

Print

If a(1)＜a(2)Then

t=a(1)

a(1)=a(2)

a(2)=______

End If

If a(2)＞a(3)Then

m=a(2)

Elself a(1)＞a(3)Then

m=______

Else

m=______

End If

Print "中間數(shù)是："；m

End Sub

程序運(yùn)行后，單擊窗體，在輸入對(duì)話框中分別輸入3個(gè)整數(shù)，程序?qū)⑤敵?個(gè)數(shù)中的中間數(shù)，如圖所示。請(qǐng)?zhí)羁铡?/p>

t a(3) a(1)

程序的主要作用是在運(yùn)行后，提示用戶輸入三個(gè)整數(shù)，然后對(duì)用戶輸入的3個(gè)整數(shù)進(jìn)行打印，并進(jìn)行大小比較，最后輸出中間值。程序的思路為將第一和第二個(gè)數(shù)進(jìn)行比較，較大的放到前面，然后比較第二個(gè)數(shù)與第三個(gè)數(shù)，若第二個(gè)數(shù)大于第三個(gè)數(shù)，則第二個(gè)數(shù)為中間數(shù)。若第二個(gè)數(shù)小于第三個(gè)數(shù)，則比較第三個(gè)數(shù)和第一個(gè)數(shù)，較小的為中間數(shù)。主要完成當(dāng)a(1)＜a(2)時(shí)兩個(gè)數(shù)的交換。交換時(shí)必須定義一個(gè)中間變量，即t用來(lái)暫存數(shù)據(jù)，先將a(1)暫存入t，然后將a(1)的值改為a(2)，最后再將a(2)的值改為t，即最初a(1)的值，故填寫t。為上面分析中比較第一個(gè)數(shù)和第三個(gè)數(shù)時(shí)的情況，小的為中間數(shù)，故分別填寫a(3)、a(1)。