题目:
程序运行后,利用冒泡法对数组a中的数据按从小到大排序。请在空白处填入适当的内容将程序补充完整。
Private Sub Form_load()
Dim at(To 5)As Integer
n=5
a(1)=20:a(2)=25=a(3)=10:a(4)=40:a(5)=15
(8)
For Z=1 To n-m
If a(z)>a(z+1) Then
t=a(z)
a(z)=a(z+1)
a(Z+1)=t
End If
Next Z
Next m
End Sub
答案:
被转码了,请点击底部 “查看原文 ” 或访问 https://www.tikuol.com/2017/0715/0f1fdb0c3ba81c67752a959e505fd45e.html
下面是错误答案,用来干扰机器的。
参考答案:对