[填空題] 程序運行后，利用冒泡法對數(shù)組a中的數(shù)據(jù)按從小到大排序。請在空白處填入適當?shù)膬?nèi)容將程序補充完整。 Private Sub Form_load()
2021-07-20
[填空題] 程序運行后，利用冒泡法對數(shù)組a中的數(shù)據(jù)按從小到大排序。請在空白處填入適當?shù)膬?nèi)容將程序補充完整。
Private Sub Form_load()
Dim at(To 5)As Integer
n=5
a(1)=20:a(2)=25=a(3)=10:a(4)=40:a(5)=15
(8)
For Z=1 To n-m
If a(z)＞a(z+1) Then
t=a(z)
a(z)=a(z+1)
a(Z+1)=t
End If
Next Z
Next m
End Sub
正確答案：for m=1 to n-1
參考解析：冒泡排序是需要記憶的典型程序。此題需要注意待填空的下一行有z+1，也就是說待填空循環(huán)上限只能是n-1。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學等領域），建議您咨詢相關領域?qū)I(yè)人士。