Key=Val(Text1.Text) i=1:j=10 flag=False
Do While i<=j And Not flag Lmid= ⑴
Rmid=j-(j-i)\3
If Key=a(Lmid) Or Key=a(Rmid) Then Flag=True
Elseif ⑵ Then
i=Lmid+1
j=Rmid-1
Elseif Key<a(Lmid) Then
j=Lmid-1
Else
i=Rmid+1
End if
Loop
If Flag And Key=a(Lmid) Then
List1.AddItem Str(Lmid)
ElseIf Flag Then
List1.AddItem Str(Rmid)
Else
List1.AddItem ⑶ EndIf
上述程序中方框处可选语句为:
①(j-i)\3+i ②(i+j)\3+1 ③Key<a(Lmid) And Key>a(Rmid) ④Key>a(Lmid) And Key<a(Rmid)
⑤str(i)+str(j) ⑥Str(j)+Str(i)
则(1)(2)(3)处的语句依次为( )