有VB程序段如下：

Dim a(1 To 6) As Integer， i As Integer

a(1) = Int(Rnd() * 5) + 95

For i=2 To 6

    a(i)=a(i-1)-Int(Rnd()*5)

    If i Mod2=0 Then a(i) = a(i) + a(i) Mod 2

Next i

程序运行后，a(1)-a(6)中可能的值是(     )

A、95  92  88  86  86  84

B、95  92  88  87  86  84

C、95  92  88  86  84  85

D、100  92  88  86  86  84