填空题
下面是用冒泡法将5个整数按升序排列，请将程序补充完整。
Sub GASR1
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
1、
【正确答案】
1、【13】 i + 1 To 4
【答案解析】【14】 t = m(i)
【15】 Next i
【命题目的】考核考生对循环控制结构和条件控制语句综合运用的能力。
【解题要点】本题考查冒泡法的程序，就是拿前面的数与后面的数比较，如果前面的数大于后面的就互换，反之什么也不做，依次类推，最小的将在前面，最大的在后面，有序排列。
【考点链接】用冒泡法数据按降序排列。