[填空題] 下面的程序用“冒泡”法將數(shù)組a中的10個(gè)整數(shù)按升序排列，請(qǐng)將程序補(bǔ)充完整。 Option Base 1 Private Sub Command1
2021-07-20
[填空題] 下面的程序用“冒泡”法將數(shù)組a中的10個(gè)整數(shù)按升序排列，請(qǐng)將程序補(bǔ)充完整。
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(678，45，324，528，439，387，87，875，273，823)
For i= 【8】
For j= 【9】
If a(i) 【10】 a(j)Then
a1=a(i)
a(i)=a(j)
a(j)=a1
End If
Next j
Next i
For i=1 To 10
Print a(i)
Next i
End Sub
正確答案：[8]1 To 9 [9]i+1 To 10 [10]＞
參考解析：[評(píng)析] 最外層的循環(huán)負(fù)責(zé)從第1個(gè)元素到第9個(gè)元素中取出一個(gè)，內(nèi)層循環(huán)負(fù)責(zé)取外層循環(huán)下標(biāo)后面的元素與它比較，如果比外層循環(huán)取出的元素小，則將二者的位置對(duì)換。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。