[填空題] 閱讀程序： Option Base 1 Private Sub Form_Click( ) Dim a(3)As Integer Print“輸入的數(shù)據(jù)是：”； For i=1 to 3A (i)=Input Box(“輸入數(shù)據(jù)”)Print a (i) Next Print If a(1)＜a(2)Thent=a(1)a(1)=a(2)a(2)= 【8】 End lf If a(2)＞a(3) Then m=a(2) Elself a(1)＞a(3) Then m= 【9】 Else m= 【10】 End lf Print“中間數(shù)是：”；m End Sub 程序運(yùn)行后，單擊窗體，在輸入對(duì)話框中分別輸入三個(gè)整數(shù)，程序?qū)⑤敵鋈齻€(gè)數(shù)中的中間數(shù)，如圖所示。請(qǐng)?zhí)羁铡?/p>正確答案：

[8]t

[9] a(3) [10] a(1) 第一個(gè)If語(yǔ)句通過(guò)中間變量t把a(bǔ)(1)值與a(2)值調(diào)換，使得a(1)的值永遠(yuǎn)大于a(2)的值，所以此時(shí)令m值為a(2)。故[8]處填：t。 如果不是“a(2)＜=a(3)”，那么在“a(1)＜=a(3)”的情況下，由于“a(2)＜=a(3)”，故此時(shí)令m的值為a(3)，即[9]處填：a(3)。 如果以上兩種情況都未出現(xiàn)，即意味著“a(2)＜=a(3)”，“a(3)＞=a(1)”，又因?yàn)?a(1)值永遠(yuǎn)大于a(2)值，故此時(shí)，“a(2)＜=a(1)＜=a(3)”，所以[10]處填：a(1)