下面是用冒泡法将5个整数按升序排列，请将程序补充完整。 SubGASR（） Dimm m=Array（10,1,5

下面是用冒泡法将5个整数按升序排列，请将程序补充完整。

Sub GASR（）

Dim m

m=Array（10, 1, 5, 6, 7）

For i=0 To 3

For j= 【13】

If m（i） >=m（j） Then

【14】

m（i） =m（j）

m（j） =t

End If

Next j

【15】

For i=0 To 4

Print m（i）

Next i

End Sub

参考答案

您可能感兴趣的试题

将整数数组（7－6－3－5－4－1－2)按照堆排序的方式进行升序排列，请问在第一轮排序结束之后，数组的顺

答案解析
下面程序是用冒泡法将数组a中的10个整数按升序排列请将程序补充完整。 Private Sub C

答案解析
请编写函数fun() 对长度为7个字符的字符串除首尾字符外将其余5个字符按ASCII码值升序排列。例

答案解析
(8)以下程序的功能是:先将随机产生的10个不同的整数放入数组a中再将这10个数按升序方式输出。请

答案解析
输入10个整数将这10个整数按升序排列输出并且奇数在前偶数在后。例如如果输人的10个数是10 9 8 7 6 5 4 3 2 1 则输出1 3 5 7 9 2 4 6 8 10。

答案解析
下列给定程序中函数fun的功能是:用冒泡法对6个字符串进行升序排列。请改正程序中的错误使它能得

答案解析