下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请在【 】、【 】、【 】处将程序补充完整。 Option Base 1 Private Sub Command1_Click () Dim a

admin2010-03-30  31

问题 下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请在【  】、【  】、【  】处将程序补充完整。
    Option Base 1
   Private Sub Command1_Click ()
           Dim a
           a=Array (678, 45, 324, 528, 439, 387, 87, 875, 273,823)
           For i=【  】
                For j=【  】
                   If a(i)【  】a(j) Then
                      a1=a(i)
                      a(i)=a(j)
                      a (j) =a1
                End If
           Next j
        Next i
       For i=1 To 10
           Print a(i)
        Next i
   End Sub

选项

答案a To 9,i+1 To 10, >=

解析
转载请注明原文地址:https://jikaoti.com/ti/weg0FFFM
0

最新回复(0)