PRIVATE SUB FORM_CLICK()

  {#blank#}1{#/blank#}

  MAX=0: MIN=21

FOR I= 1 TO 10

   A(I)={#blank#}2{#/blank#}

  IF {#blank#}3{#/blank#} THEN   MAX=A(I)

  IF {#blank#}4{#/blank#} THEN  MIN=A(I)

NEXT I

PRINT “最大数是”；MAX ,”最小数是” ；MIN

END SUB

    Dim a(1 To 5) As Integer

    a(1) = 1

    For i = 2 To 5

      a(i) = Int(Rnd() * 3) + 3

    Next i

    For i = 2 To 5

      If a(i) Mod 2 = 1 Then

        a(i) = a(i) + a(i - 1)

      Else

        a(i) = a(i) / 2

      End If

    Next i

执行程序后，a数组各元素可能是（  ）