[填空題] 下面的程序用“冒泡”法將數(shù)組a中的10個(gè)整數(shù)按升序排列,請(qǐng)將程序補(bǔ)充完整。 Option Base 1 Private Sub Command1_C
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)容僅供參考,如果您需要解決具體問(wèn)題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢(xún)相關(guān)領(lǐng)域?qū)I(yè)人士。