[填空题] 下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请将程序补充完整。 Option Base 1 Private Sub Command1_Click()Dim aa = Arr

19 查阅

[填空题] 下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请将程序补充完整。

Option Base 1

Private Sub Command1_Click()

Dim a

a = Array(549, 45, 324, 561, 439, 258, 87, 435, 587, 823)

For i = 【5】

For j = 【6】

If a(i) 【7】 a(j) Then

al = a(i)

a(i) = a(j)

a(j) = al

End If

Next j

Next i

For i = 1 To 10

Print a(i)

Next i

End Sub

参考答案:

1 To 9 i+ 1 To 10 >

最外层的循环负责从第一个元素到第九个元素中取出一个,内层循环负责从外层循环取出的元素的后继所有元素和其比较,如果比外层循环取出的元素小,则将二者的位置对换。

计算机考试