下面是用冒泡法将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