[填空題] 閱讀程序: Option Base 1 Private Sub Form_Click( ) Dim a(3)As Integer
[填空題] 閱讀程序:
Option Base 1
Private Sub Form_Click( )
Dim a(3)As Integer
Print“輸入的數(shù)據(jù)是:”;
For i=1 to 3
A (i)=Input Box(“輸入數(shù)據(jù)”)
Print a (i)
Next
If a(1)<a(2)Then
t=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)行后,單擊窗體,在輸入對話框中分別輸入三個整數(shù),程序?qū)⑤敵鋈齻€數(shù)中的中間數(shù),如圖所示。請?zhí)羁铡?/p>
正確答案:[8]t [9] a(3) [10] a(1)
參考解析:第一個If語句通過中間變量t把a(bǔ)(1)值與a(2)值調(diào)換,使得a(1)的值永遠(yuǎn)大于a(2)的值,所以此時令m值為a(2)。故[8]處填:t。 如果不是“a(2)<=a(3)”,那么在“a(1)<=a(3)”的情況下,由于“a(2)<=a(3)”,故此時令m的值為a(3),即[9]處填:a(3)。 如果以上兩種情況都未出現(xiàn),即意味著“a(2)<=a(3)”,“a(3)>=a(1)”,又因為 a(1)值永遠(yuǎn)大于a(2)值,故此時,“a(2)<=a(1)<=a(3)”,所以[10]處填:a(1)
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。