二分查找又称折半查找，是一种应用于有序数列的高效查找算法。下列数列中适合二分查找算法的是（   ）
（1）11  99  5  17  2  39
（2）30  52  63  71  78  81
（3）67  62   68  6  15  15
（4）85  78  59  53  19  18

A．（3）（4）

B．（2）（3）

C．（1）（2）

D．（2）（4）

酒店房间管理问题：某酒店房间（房间数小于1000）编号按1、2、3……连续编号，客房经理对没有入住的房间使用如下方法来登记管理。连续的空房间，登记第一个房间的编号和连续的空房间数，比如空房间1，2，6，7，8，10，则登记3条记录，分别为1_2，6_3，10_1。某旅客如果退房，需要把这个房间号也登记进去，共有4中情况需要处理：
（1）上靠：若退的房间号为3，则原来登记的记录变为1_3，6_3，10_1；
（2）下靠：若退的房间号为5，则原来登记的记录变为1_2，5_4，10_1；
（3）上下靠：若退的房间号为9，则原来登记的记录变为1_2，6_5；
（4）上下都不靠：若退的房间号为4，则原来登记的记录变为1_2，4_1，6_3，10_1
根据上述规则，小明编写了相应的VB程序，程序启动时读入空房间数据，并在列表框List1中显示，在文本框Text1中输入退房号，单击“退房”按钮后更新列表框List1中的数据。
程序界面如下图所示，请回答下列问题：

（1）当前登记的记录有3条，分别为2_3，6_2，9_4。某旅客退掉8号房间，则登记的记录将变为________。
第二部分通用技术（共50分）
（2）实现上述功能的VB程序如下，请将划线处的代码补充完整。
Const n=1000
Dim a（0 To n）As Integer a(i)保存第i条记录的开始房间号
Dim b（0 To n）As Integer b(i)保存第i条记录的房间数
Dim c As Integer, k As Integer, sp As Integer k为原始记录数
Private Sub Form_Load()
程序启动时从数据库中读取原始k条记录，依次存入a（1），b（1），a（2），b（2），…，a（k），b（k），代码略
为了程序处理方便，虚设下面两条记录
A(0)=0:b(0)=0:sp=k+1:a(sp )=1000:b(sp)=0
End Sub
Private Sub Command1_Click()

Dim i As Integer, j As Integer

c=Val(Text1.Text)

i=1

Do While a(i)<c

i=i+1

Loop

i=i-1

以下处理退房登记问题
Ifa(i)+b(i)=c Then
If a(i+1)=c+1Then   处理第3种情况

  ①__________

For j=i+1 To sp-1

a(j)=a(j+1):b(j)=b(j+1)
Next j
sp = sp-1

Else 处理第1种情况

b(i)=b(i)+1

End If

ElseIfc+1=a(i+1)Then 处理第2种情况

a(i+1)=c:b(i+1)=b(i+1)+1

Else 处理第4种情况

For j= ②________

a(j)=a(j-1):b(j)=b(j-1)

Next j

a(i+1)=c:b(i+1)=1: ③______

End If
List1.Clear
For i=1To sp-1

List1.Addltem"第"& CStr(i) &"条记录"&CStr(a(i))&"_"&CStr(b(i))

CStr函数的作用是将数字转成字符串

Next i

End Sub

某对分查找算法的VB程序段如下：
Key=val(Text1. text)
i = 1: j = 10
Do While i <= j
m = int<(i + j) / 2)
If a(m) = key Then Exit Do
If key>a(m) Then i = m + 1 Else j = m - 1
Text2. text= Text2. text+str(a(m))
Loop

数组元素a(1)到a(10)的值依次为“5，12，20，29，36，40，55，58，66，74”，若在文本框Text1中输入数据，执行该程序段，文本框Text2中显示的内容为：36，58，40，55，则key的值可能是

A．38

B．45

C．55

D．70

小王设计“模拟撤销”程序，需要用一个“历史记录”，“历史记录”是在对字符串s进行插入或删除时，将每步操作信息依次存储得到的，操作信息由操作符（“+”表示插入，“－”表示删除）、操作位置和操作字符串（只包含英文字母）构成，例如，“+23abc”表示在字符串s第23个位插入了“abc”，“模拟撤销”过程按照“历史记录”的逆序进行，将字符串s的内容恢复到初始状态。对字符串“Book”的操作与撤销过程，如下图所示。

小王编写的“模拟撤销”VB程序如下，文本框 Text1中的内容是撤销前字符串，文本概Text2中的内容是历史记录，单击“撤销”按钮Command1后，在标签Label1中显示撤销过程，程序运行界面如由下图所示。
 
（1）实观上述功能的VB程序如下，在程序中出现的对象没有Caption属性的是______ 。（选填，填字码：

A．Label1  /

B．Command1  /

C．Text1和Text2）

（2）请在划线处填入合适代码。
Private Sub Command1_Click()
Dim s As String, t As String, ch As String
Dim c As String, num As String, ss As String
Dim n As Integer, i As Integer
s = Text1.Text: t = Text2.Text
c = "": num = "": ss = s
For i = Len(t) To 1 Step -1
___________________   
If ch >= "a" And ch <= "z" Or ch >= "A" And ch = "Z" Then
c = ch + c
ElseIf ch >= "0" And ch <= "9" Then
num = ch + num
Else
n = Val(num)
If ch = "－" Then
s = Mid(s, 1, n - 1) + ____________________________  
Else
s = Mid(s, 1, n - 1) + Mid(s, n + Len(c), Len(s) - n - Len(c) + 1)
End If
ss = ss + "→" + s
c = "": num = ""
End If
Next i
Label1.Caption = ss
End Sub
（3）运行该程序，若文本框Text1中的内容是"April"，文本框Text2中的内容是”－3p+3ri－6e”，单击撤销按钮，For循环语句执行完成后，字符串s的值是_____________。

有如下程序段：

数组元素a(1)到a(10)的值依次为“66，34，12，59，21，26，18，45，20，16”，经过该程序段“加工”后，数组元素a(1)到a(10)的值依次为（   ）

A．66，12，16，34，18，59，21，26，20，45

B．12，16，18，20，21，26，34，45，59，66

C．66，59，45，34，12，26，21，20，18，16

D．12，16，18，66，34，20，59，21，26，45