For i = 1 To 2

        For j = 2 To 7 - i

            If a(j) > a(j - 1) Then

                k = a(j): a(j) = a(j - 1): a(j - 1) = k

            End If

        Next j

Next i

数组元素a(1)到a(6)的值依次为“71，54，58，29，31，78”，经过该程序段“加工”后，下列说法正确的是（   ）

s=″72186345945″:c=0

For i=1 To 6

a(i)=Mid(s,i,i)

Next i

For i=1 To 4 Step 2

k=i

For j=i+2 To 6 Step 2

If a(j)<a(k) Then k=j

Next j

If k<>i Then

t=a(i):a(i)=a(k):a(k)=t:c=c+1

End If

Next i

Text1.Text=Str(c)

该程序段运行后,Text1中显示的内容是（  ）

i = 1

 Do While i <= 6

    t = Int(Rnd * 10) + 1

    If t Mod 2 = i Mod 2 Then a(i) = t : i = i + 1

Loop

For i = 1 To 2

   k = 1

   For j = 1 To 6 - i * 2

     If a(j) * k > a(j + 2) * k Then

       t = a(j) :  a(j) = a(j + 2) :  a(j + 2) = t

     End If

     k = -k

   Next j

Next i

执行该程序段后，数组元素a(1)到a(6)的值可能是（  ）

Const n =10

For i = 1 To n - 1

    t = n - (n + i ) Mod 2

    For j = t To i + 2  Step -2

        If d(j)> d(j - 2)  Then

            Temp=d(j)

            d(j) = d(j - 2)

            d(j - 2) = temp

        End If

    Next j

Next i

已知数组元素d(1)到d(10)的原始数据为1、2、3、4、5、6、7、8、9、10.程序运行后，d(10)的值为（ ）

p = 1: q = 10

Do While p < q

  iMin = p: iMax = p

  For i = p + 1 To q

    If a(i) < a(iMin) Then iMin = i

    If a(i) > a(iMax) Then iMax = i

  Next i

t = a(iMin): a(iMin) = a(p): a(p) = t

  t = a(iMax): a(iMax) = a(q): a(q) = t

  p = p + 1

  q = q - 1

Loop

For i = 1 To 5

 k = i

 For j = i + 1 To 6

  If a(k) > a(j) Then k = j

 Next j

 t = a(k): a(k) = a(i): a(i) = t

 b((i + 2) Mod 6 + 1) = a(i)

Next i