p=a(1)

For I=2  to  30

  If  a(I) < p  then  p=a(I)

Next I

该程序段执行后，变量I的值是（   ）

s = 0

For a =      To 8 Step 2

  s = s + a

Next a 

若要使语句s = s + a执行3次，则循环变量a初值为（   ）

    For i=1 to 10

    b(i)=0

    Next i

For i=1 To 5

  For j=1 To 10

    If b(i)<a(j)Then

    b(i)=a(j)

    t=j

    End If

    Next j

    a(t)=0

    List1．AddI tem Str(b(i))

Next i

其中数组元素a(1)到a(10)的值依次为“25，42，53，66，77，83，98，14，38，99”，执行程序后，在列表框List1中依次输出的数据是（  ）

    For i= 1 To 6

       a(i)=i+1

    Next i

该程序段运行后数组元素a(3)的值是：（   ）

在这个算法中，最多有几次猜价机会（  ）

Dim a(1 To 10) As Integer, f(1 To 20) As Boolean

    'f数组各元素的初值设为False，代码略

    For i = 1 To 10

       t =int(rnd()*20+1)

       If Not f(t) Then

          a(i) = t:      ⑴     

          For j = i To 2 Step -1

             If    ⑵    Then

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

             End If

          Next j

       Else

               ⑶    

       End If

    Next i

上述程序中3处下划线应填入的程序代码是（  ）