[填空题] 下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请在 【9】 、 【10】 、 【11】 处将程序补充完整。 Option base 1 Private Sub Command1_Click () Dim a a=Array (678, 45, 324, 528, 439, 387, 87, 875, 273,823) For i= 【9】 For j= 【10】 If a(i) 【11】 a(j) Then a1=a(i) a(i)=a(j) a (j) =a1End If Next jNext i For i=1 To 10 Print a(i)Next i End Sub
正确答案:[9] a To 9
参考解析:[10] i+1 To 10 [11] >=
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)