有如下VB程序段: Dim a(1 To 5) As Integer a(1) = 1 For i = 2 To 5 a(i) = Int(Rnd( ) * 3) + 3 Next i For i = 2 To 5 If a(i) Mod 2 = 1 Then a(i) = a(i) + a(i - 1) Else a(i) = a(i) / 2 End If Next i 执行程序后,a数组各元素可能是( )
A . 1,2,6,10,13
B . 1,4,9,2,7
C . 1,5,8,15,22
D . 1,2,5,11,1
答案:B