L = 1: R = 10: Key = 21

Do While L <= R

    m = (L + R) \ 2

    If a(m) <= Key Then

        L = m + 1

    Else

        R = m - 1

    End If

Loop

数组元素 a(1)到 a(10)的值依次为“ 3， 9， 21， 21， 21， 21， 27， 28， 39， 40”，执行该程序段，变量R、a(R)的值分别是（  ）

当文本框Text1中输入的值为32时，程序运行结束后变量c的值为（  ）

Dim a( 1 To 10) As Integer

Function Search(L As Integer， R As Integer)

As Integer

     M=(L+R)＼2

     If a(M) <a(M-1) And a(M) >a(M+1) Then

     ①

     ElseIf a(M) >a(Ｍ-1) And a(M) >a(Ｍ+1) Then

     ②

     ElseIf a(M) >a(Ｍ-1) And a(M) <a(M+1) Then

     ③

     End If

End Function

Private Sub Command 1 click()

     Label 1.caption=““峰顶”值是：” +Str(Search (1，10))

End Sub

上述程序中划线处可选语句为：

①Search=Search(M+1，R)

②Search=Search(L，M-1)

③Search=a(M)

则①②③处的语句依次是（  ）

Key=Val(Text1.Text)\10

Text2.Text=“”

i=1: j=9: f=False

Do While i<=j And Not f

    m=(i+j)\2

    if a(m) Mod 10=Key Then

        search=m

        f=True

    Elseif a(m) Mod 10>Key Then

        i=m+1

    Else

        j=m-1

    End if

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

Loop

则在执行该程序后，Text2中显示的内容是（    ）

s ="ghi jabcdef"

key = Chr(97 + 3 * Int(Rnd * 4))

i =1：j=Len(s)

Do While i< = j

    m=(i+j+1)\2

    ans=ans+Str(m)

    c = Mid(s，m，1)

    If c=key Then Exit Do

    If Mid(s，i，1) < c Then

       If key>=Mid(s，i，1) And key<c Then j=m-1 Else i=m+1

    Else

       If key>c And key <= Mid(s，j，1) Then i =m+1 Else j=m- 1

    End If

Loop

运行程序后，变量ans的值不可能是(    )