[填空题] 下面是用冒泡法将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
[填空题] 下面是用冒泡法将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
i + 1 To 4
本题考查冒泡法的程序,就是拿前面的数与后面的数比较,如果前面的 数大于后面的就互换,反之什么也不做,依次类推,最小的将在前面,最大的在后面,有序排列。
VIP截止日期:2025-01-01 15:15:40
←请使用支付宝扫码支付VIP截止日期:2025-01-01 15:15:40
←请使用微信扫码支付