Const  n=6

  Flag=False：key=30

  For i=1 To n-1

    L=i+1：R=n

    Do While L<=R And flag=False

       m=(L+R)＼2

       If d(i)+d(m)<key Then

            L=m+1

       ElseIf d(i)+d(m)>key Then

            R=m-l

       Else

            Label1.Caption=Str(d(i))+" "+Str(d(m))

            flag=True

       End If

    Loop

  Next i

  If Not flag Then Label1.Caption=“没有符合条件的数对”

数组元素d（1）到d（6）的值依次为“5，8，13，17，22，25”。则程序段执行后，标签Label1中显示的内容是（  ）

若存在和为key的数对，输出该数对包含的两个整数，小的在前，大的在后；

若存在多个数对满足条件，则输出最先找到的数对；

若找不到符合要求的数对，则输出“没有符合条件的数对”。

根据上述算法，小黄编写了一个VB程序，功能如下：程序加载时，自动生成50个互异的、按升序排列的随机正整数，依次存入数组a中，并显示在列表框List1中。在文本框Text1中输入key的值，单击“查找”按钮Command1，查找结果在列表框List2中输出。程序运行界面如图所示。

i = 1: j = 6: n = 0: f = False

Key = Val(Text1.Text)

Do While i <= j And Not f

  n = n + 1

  m = (i+j + 1) \ 2

  If Key = a(m) Then f = True

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

Loop

数组元素a（1）到a（6）的值依次为“12，19，27，37，49,55”。若在文本框Text1中输入27，则以上程序段执行后，下列说法不正确的是（   ）

i=1

j=6

s=“”

Key=Text1. Text

Do While i <=j

 m=Int((i+j) / 2+0. 5)

 s=s+“ ”+a(m)

 If Key > a(m) Then

  i=m+1

 Else

  j=m-1

 End If

Loop

Text1. Text=s

数组元素a(1)到a(6)的值分别为“Beijing”“Guangdong”“Jiangsu” “Jiangxi”“Shanghai” “Zhejiang”，己按字典序排序。当key的值为“Zhejiang”时，单击命令按钮Command1，文本框Text1中显示的内容为（  ）

Private Sub Command1_Click()

 Dim a As Integer,b As Integer,c As Integer

 Dim d As Integer

 a=Val(Text1.Text):b=Val(Text2.Text):c=Val(Text3.Text)

 d=min(a,b)+min(b,c)

 Text4.Text=Str(d)

End Sub

Function min(x As Integer,y As Integer)As Integer

 If x<y Then min=x Else min=y

End Function

运行该程序，在文本框Text1、文本框Text2、文本框Text3中分别输入2、-5、6后，单击命令按钮Command1，文本框Text4中显示的是（  ）

执行语句 s=fun(5) ，则 s 的值为(         )