有如下VB程序段：

i = 1

Do While i < = 6

  a（i） = Int（Rnd* 10） + 1

  If a（i）Mod 2 = I Mod 2 Then

    i=i-1

  Else If I Mod 2 = 0 Then

    a（i） =a（i - 1） + a（i）

  End If

  i=i+1

Loop

执行该程序后，a（1）-a（6）各元素不可能的值是(    )

A、 6，13，8，11，6，17

B、 8，11，4，5，8，17

C、 8，9，8，17，10，11

D、 6，13，6，9，4，9