Dim a(l To 5) As Integer, i As Integer, c As Integer

a(l) = 2 : a(2) = 1 : a(3) = 3 : a(4)=4 : a(5) = 5

c=0

For i = 3 To 5

If a(i - 2) + a(i - 1) = a(i) Then c = c + 1

Next i

Textl. Text = Str(c)

该程序段运行后，文本框Textl中显示的内容是（   ）

Dim a(1To 5)As Integer

i=1:n=5

Randomize

For i=1 To n

    x=Int(Rnd*10)*2+1

    If(x Mod 10+x\10)Mod 2=0 Then

        a(i)=x

    Else

        a(n-i+1)=x

    End If

Next i

数组元素的初值均为0，执行该程序段后，a（1）至a（5）的值可能的是（    ）

s="13Ka5iSh79"

s1=""

for i in s:

    if "0" <= i <= "9":

        s1=i+s1

    else:

        s1+=i

print(s1)

执行该程序段后，输出的结果是（   ）