x=9
Print "x="; x+1
i=1: j = 5: k=0: s =""
key = Int (Rnd * 100)
Do While i<=j
k=k+1
m=(i+j)\2
s = s+Str(a(i))
If key = a(m) Then
Exit Do ‘ExitDo表示退出循环
Elself key < a(m) Then
j =m-1
Else
i=m+1
End If
Loop
Text1. Text = s
数组元素a(1)到a(5)的值依次为“6,18,25;37 ,49”。若该程序段执行后,k的值为3,则key的值不可能为( )
Const n = 6
Dim a(0 To n)As String
Dim i As Integer,j As Integer
a(1)="118":a(2)="36":a(3)="98":a(4)="15":a(5)="88":a(6)="2"
For i = 2 To 4
a(0)= a(i): j = i - 1
Do While a(0) < a(j)
a(j + 1)=a(j)
j =j - 1
Loop
a(j + 1)= a(0)
Next i
执行该段程序后,数组元素a(1)到a(6)的值依次为( )
Const n =10
Dim a(1 To n)As Integer
‘随机生成10个1-100之间的数存储在数组a中,代码略
For i=1 to n\2
For j= ⑴ To i+1 Step-1
If a(j)<a(j-1)Then t = a(j):a(j)=a(j-1):a(j-1)=t
Next j
For k=i+1 To ⑵
If a(k)>a(k +1)Then t =a(k):a(k)= a(k +1):a(k+1)=t
Next k
Next i
划线处可选代码为:①2 ②n-i+1 ③n ④n-i
则(1)、(2)处语句依次为( )