[填空题] 下面是用冒泡法将5个整数按升序排列,请将程序补充完整。 Sub GASR() Dim m m=Array(10,1,5,6,7) For i=0 To 3 F
17 查阅
[填空题] 下面是用冒泡法将5个整数按升序排列,请将程序补充完整。 Sub GASR() Dim m m=Array(10,1,5,6,7) For i=0 To 3 For j=【】 If m(i) >=m(j) Then 【】 m(i) =m(j) m(j) =t End If Next j 【】 For i=0 To 4 Print m(i) Next i End Sub
参考答案: