Dim a(1 To 10) As Integer

a(1) = 1: a(2) = 2

For i = 3 To 10

    a(i) = a(i - 1) + a(i - 2)

Next i

i = 1: j = 10: f = False

Do While i <= j And f = False

    num = num + 1

    m = (i + j) \ 2

    If num = a(m) Then

        f = True

    ElseIf num < a(m) Then

        j = m - 1

    Else

        i = m + 1

    End If

    Text1.Text = Text1.Text + Str(m)

Loop

该程序段执行结束后，文本框Text1中显示的内容是（  ）

n = 0 : i = 1 : j = 8

Key = Val(Text1.Text)

Do While i <= j

    m = (i + j) \ 2

        If Key = d(m) Then  Exit Do   'Exit Do表示退出循环

If Key > d(m) Then

j = m - 1 : n = n - 1

Else

i = m + 1 : n = n + 1

        End If

Loop

Label1.Caption = Str(n)

当输入不同的Key值，运行该程序段后，在标签Label1中显示的不同结果共有（  ）

Dim i As Integer,j As Integer,Key As Integer,m As Integer,s As String

i=1: j=7: s=“”:flag=False

Key=Int(Rnd()* 50)

Do While i <=j And Not Flag

 m=(i+j)\2

 If Key=a(m) Then

  Flag=True

 ElseIf Key < a(m) Then

  j=m-1

 Else

  i=m+1

 End If

 s=s+Str(a(m))

Loop

Text1.Text=s

数组中a(1)到a(7)的值依次为“23，33，45，56，68，77，89”，则Text1 中显示的内容不可能是（  ）

奇数阶幻方的构造是所有幻方中最简单的，可以按照如下规则来实现：

⑴将1放在第一行中间一列；(如图2)

⑵从2开始直到n*n为止，各数按下列规则存放：

假设当前要存放的数为k，则k存放在k-1)数的右上方并按照规则

①若(k-1)放在第1行且不是最后一列，则将k存放在n行，(k-1)所在列右侧；(如图3)

②若(k-1)放在第n列且不是第一行，则将k存放在第1列，k-1)的上1行；(如图4)

③若(k-1)即不在第1行也不在最后1列：

若(k-1)右上方有数，则将k放在(k-1)的下1行的同一列。(如图5)

若(k-1)右上方没有数，则将k放在(k-1)的右上方；(如图6)

④若(k-1)在第1行第n列，将k填在(k-1)的正下方(如图7)

n=0

Key=int(Rnd*7)+2

L=1: R=8

Do While L<=R

    m=(L+R)\2

    if Key=a(m) Then

       Exit Do

    Elseif a(m)<Key Then

       L=m+1

       n=n+1

    Else

       R=m-1

       n=n-1

Loop

print Str(n)

则程序运行后，输出的结果不可能是（     ）

d= [1,3,8,15,22,26,28,40,46,61,80]

i=0;j=len(d)-1

while i<=j:

    m= (i+j)//2

    if key<d[m] :

        j=m-1

    else:

若 key 值为 22，程序运行结束后，加框处语句执行的次数为（   ）