1. (2020·杭州模拟) 有如下的VB程序段：

Dim a（1 To 6）As integer

a（1）=1

For i=2 To 6

   Randomize

   a（i）=a（i-1）+Int（Rnd*5+1）

If a（i） Mod 2=1 Then

    a（i）=a（i）\2+1

Else

a（i）=a（i）/2

End If

Next i

执行程序后，数组各元素不可能是(    )