有如下VB程序段：

For i=1 To 5

    a(i)=Int (Rnd*9) +1

Next i

For i= 1 To 5

    If i Mod2=0 Then

        a(i) = a(i)\i

    Else

        a(i)= a(i) Mod i

    End If

Next i

执行该程序段后，在下列选项中a(1)至a(5)各元素可能是（    ）

A、0 3 2 1 4

B、1 2 3 4 5

C、0 1 4 2 3

D、0 5 2 2 4