Dim left As Integer, right As Integer, n As Integer, x As Integer
n = Val(Text1.Text)
left = 1: right = n
Do While ①
x = (left + right) \ 2
If 2 ^ x + 3 * x - 5 <= n Then
left = x + 1
Else
right = x - 1
End If
Loop
Label1.Caption = "方程2^x+3*x-5<=n的最大正整数解为:" + Str( ② )
为实现程序功能,①②处代码应为( )