有一组正整数,要求对其中的奇偶数进行交换。交换后奇数在前,偶数在后,并保持相对顺序不变。 Const n = 10 Private Sub Command1_Click() num = 0: k = 0 Do While k < n k = k + 1 If ① Then num = num + 1 b(num) = a(k) Else ② End If Loop For j =③ a(j) = b(j - n + num) Next j End Sub 下列选项中,①②③中的代码顺序正确的是( )
A . ①a(k) Mod 2 = 1 ②b(k - num) = a(k) ③n - num To n
B . ①a(k) Mod 2 = 0 ②a(k - num) = a(k) ③n - num + 1 To n
C . ①a(k) Mod 2 = 1 ②a(k - num) = a(k) ③n - num To n
D . ①a(k) Mod 2 = 0 ②b(k - num) = a(k) ③n - num + 1 To n
答案:B