Dim a(1 To 10) As Integer，i As Integer，j As Integer

a(1)=1

a(2)=1

For i=3 To 5

a(i)=1

For j=i-1 To 2 Step -1

a(j)=a(j)+a(j-1)

Next j

Next i

Text1.Text=Str(a(3))

该程序段运行后，在文本框Text1中显示的内容是(  )

Const n = 8

Dim a(1 To n) As Integer

For i = 1 To n

    a(i) = Int(Rnd * 20)

Next i

x = n \ 2

For i = x To 2 Step -1

    For j = 1 To i - 1

      If a(j) < a(i) Then

        t = a(j): a(j) = a(i): a(i) = t

      End If

    Next j

Next i

i = n

Do While i > x + 1

    k = i

    For j = i - 1 To x + 1 Step -1

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

    Next j

    If k <> i Then

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

    End If

    i = i - 1

Loop

执行完这段代码后，数组 a 中各个元素的值可能的是（  ）