有如下VB程序段： For i= 1 To 5

a(i)= Int(Rnd * 20) + 1 Next i

For i= 2 To 5

If i Mod 2 = 1 And a(i-1) < a(i)Then  t=a(i):a(i)=a(i-1):a(i-1)=t

Else

a(i)=a(i)-1 End If

Next i

执行该程序段后，a（1）~ a（5）各元素不可能的值是（  ）

A、7 3 0 19 0

B、18 16 1 9 2

C、20 17 8 19 15

D、19 0 7 8 4