某数组有8个元素，依次为500、419、352、350、300、200、180、100，若采用顺序查找法在该数组中查找数据300，需要查找的次数是（  ）

A．1

B．3

C．4

D．5

某同学设计了一个排序算法，先将数组a中奇数位置的元素、偶数位置的元素分别进行排序，然后再进行后续处理，直至所有元素按降序排列。算法的VB程序段如下：
‘待排序数据已存储在数组a中(a(1)～a(n))

上述程序段中3处方框处的代码分别为

A．①i+1 To n Step 2   ②2 To n Step 2   ③a(j+1)=t

B．①i+2 To n Step 2   ②3 To n Step 2   ③a(j+1)=t

C．①i+2 To n Step 2   ②2 To n Step 2   ③a(j)=t

D．①i+1 To n Step 2   ②3 To n Step 2   ③a(j)=t

（加试题）有以下 VB 程序段
For i = 1 To 2
For j = 1 To 4-i

If d(j) > d(j +1)Then

t = d(j):d(j) = d(j +1):d(j +1) = t

End If

Next j
Next i
数组元素 a(1)到 a(5)的值依次为“51，36，78，18，15”，经过该程序段“加工”后，数组元素
a(1)到 a(5)的值依次为（   ）

A．36，18, 51，78，15	B．36，18，15，51，78
C．15，18，36，51，78	D．36, 51，18，78，15

（加试题）对数组a中的u个元素进行排序，生成左右交替上升的数据序列，结果如下表所示：

a(1)	a(2)	a(3)	……	a(n-2)	a(n-1)	a(n)
17	39	48	……	79	46	34

 
设计一个VB程序，单击“排序”按钮Command1后，在标签中输出排序后的数据序列，运行结果如图所示。

实现上述功能的VB程序如下，加框处代码有错，请改正。
Const n-9  ‘变量u存储待排序数据个数，以9个数为例
Dim a(1 Ton) As Integer ‘数组a存储待排序数据
Private Sub Command1_Click()

Dim i As Integer，j As Integer，t As Integer，k As Integer

‘读取一组正整数，存入数组a中，

‘在标签Label中依次输出排序前数组a从1到n各个元素的值，代码略；

For i = 1 To n\2

k=1 Label'①________
For j=i+1 To n-i+1
If a(k) > a(j) Then k = j
Next j
For j=i+1To n ‘②________
If a(j) <a(j +1) Then t =a(j): a(j) =a(j +1): a(j +1)=
Next j
Next i

‘在标签中依次输出排序后数组a从1到n各个元素的值，代码略；

End Sub