[填空題] 下面的程序用“冒泡”法將數(shù)組a中的10個整數(shù)按升序排列,請將程序補充完整。 Option Base 1 Private Sub Comman
2021-07-20
[填空題] 下面的程序用“冒泡”法將數(shù)組a中的10個整數(shù)按升序排列,請將程序補充完整。
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】>
參考解析:[評析] 最外層的循環(huán)負(fù)責(zé)從第1個元素到第9個元素中取出一個,內(nèi)層循環(huán)負(fù)責(zé)取外層循環(huán)下標(biāo)后面的元素與它比較,如果比外層循環(huán)取出的元素小,則將二者的位置對換。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。