​

请问右边的程序段运行结束后，

变量x的值为{#blank#}1{#/blank#}

变量y的值为{#blank#}2{#/blank#}

a(1)=False

For i = 2 To 20

       a(i) = True

Next i

For i = 2 To 20

      If a(i) = True Then

        For j = 2 To 20 \ i

          a(i * j) = False

        Next j

      End If

Next i

t = 0

For i = 1 To 20

      If a(i) = True Then

        t = t + 1

      End If

Next i

经过该程序段运行后，变量t的值为（   ）

Dim a(0 To 9) As Integer, t as Long

t=Val(Text1.Text)

Do While t<>0

 a(t Mod 10) = 1

 t = t \ 10

Loop

For i = 0 To 9

 x = x + a(i)

Next i

Text1中输入10242048，则程序执行后x的值为（  ）

For i=1 To 8

    d(i)= In(Rnd*10)

Next i

For i= 2 To 8

    If i Mod 2=0 And d(i)> d(i-1)Then

        d(i)=d(i-1)+1

    ElseIf i Mod 2= 1 Then

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

            t=d(i): d(i)=d(i-2): d(i-2)=t

    End If

Next i（  ）