key = Val(Text1.Text)

i = 0: j = 9:  s = 0

Do While i <= j

m = Fix((i + j) \ 2 + 0.5)

s = s + 1

If key = a(m) Then

Label1.Caption = Label1.Caption + "→" + Str(m)

Exit Do  'Exit Do表示退出循环

End If

If key <a(m) Then j = m - 1 Else i = m + 1

Label1.Caption = Label1.Caption + "→" + Str(m)

Loop

Label2.Caption = "历经" + CStr(s) + "步"

⑴各像素点的颜色信息值（介于0至255之间的一个正整数），存储至数组a中。

⑵给定模糊处理的模糊中心位置p和模糊半径r（r>1），中心位置p即为半径为1的区域，

①确定模糊中心点在如下数阵中的位置。若模糊中心为36时，该模糊中心在数阵中对应位置为第4行第6列；

图a

②根据中心点和模糊半径确定模糊处理的像素点的范围。

⑶依序将模糊处理范围内的像素点进行模糊处理。模糊处理的方式为：最外侧的像素点颜色信息不变，中间各像素点的新颜色信息值为该像素点上下左右相邻四个像素点颜色信息值的平均值。

程序运行时，在文本框Text1中输入模糊的中心点p，在文本框Text2中输入模糊的半径r，窗体加载，通过列表框List1输出图像模糊处理前的信息，单击命令按钮Command1后通过列表框List2输出模糊后的图像信息。程序运行效果如图b所示。相应的模糊中心位置由椭圆圈注，中间各像素点由矩形框圈注

图b

实现上述功能的VB程序如下。请回答下列问题：

i = 1: j = 10: n = 0: flag = True

Key = Val(Text1.Text)

Do While i <= jAnd flag = True

    m = (i + j) \ 2

    If a(m) = Key Then

        flag = False

    ElseIf a(m) < Key Then

        i = m + 1

        n = n - 1

    Else

        j = m– 1

        n = n + 1

    End If

Loop

数组元素a(1)到a(10)的值依次是“5,16,22,28,35,43,52,67,78,89”，变量n的值最终是0，则文本框Text1输入的数值范围可能是（   ）

min=a(1)

n=Val(Text1.Text)

For i=n to 2 step -1

 If a(i)<min Then

min=a(i)

Next i  

Text2.Text=Str(min)

假设在文本框Text1中输入“8”，则文本框Text2输出的值是（  ）

n=0

i=1

j=6

key=val(Text1 text)

f=False

Do While i<=j And Not f

    m=(i+j+1)\2

    n=n+1

    If key=d(m) Then

       f=True

       ElseIf key>d(m) Then

       j=m-1

       Else

          i=m+1

       End if

Loop

数组元素d（1）到d（6）的值依次为“87，72,53,41,29,18”，若该程段运行结束后，n的值为2，则key的值是 （  ）

a(1)=2: a(2)=6: a(3)=8: a(4)=9: a(5)=12

a(6)=15: a(7)=17: a(8)=18: a(9)=22: a(10)=30

k=Val(Text1.Text)

i=1: j=10

Do While i <=j

 m=(i+j) \ 2

 If a(m) <=k Then

    i=m+1

 Else

    j=m-1

 End If

Loop

Text2.Text=Str(a(i))+"← →"+Str(a(j))

程序运行时，文本框Text1中输入5，文本框Text2中显示的内容是（  ）