1. (2020高三上·杭州期中) 某 VB 程序段如下：

Dim a（1 To 6）As Integer

Randomize

a(1)=Int（Rnd*2）+1

For i=2 To 6

  a(i)=Int（Rnd*i）*2+1

  If a(i)< a(i-1)Then

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

  End If

Next i

执行该程序段后，数组元素a(1)到a(6)的值可能是（   ）