题目

有如下VB程序段： i=6 Do While i>= 1   t= Int(Rnd * 10)+ 1   If t Mod 2=i Mod 2 Then a(i)=t: i=i-1 Loop For i=1 To 2   k=-1   For j=1 To 5-i     If a(j) * k>a(j+2) *k Then       temp= a(i): a(j)=a(j+2): a(j+2)= temp     End If     k=-k   Next j Next i 执行该程序段后，数组元素a(1)到a(6)值可能是（    ） A . 9，2，9，6，1，8 B . 1，6，3，4，7，4 C . 5，4，3，2，7，8 D . 7，0，5，2，3，4 答案：A

查看本题答案和解析