a(1) | a(2) | a(3) | a(4) | a(5) | a(6) | a(7) | a(8) | a(9) | a(10) |
1 | 10 | 3 | 8 | 5 | 6 | 7 | 4 | 9 | 2 |
依据对分查找思想,设计一个在数组a中查找数据key的程序,实现该功能的VB程序如下,请回答下列问题:
(1)观察程序代码,该事件处理过程名为______________。
(2)程序加框处代码有错,请改正。
应改为:________________________
(3)请在划线处填入合适的代码。
①处代码为:______________________________,②处代码为:_____________________________。
Private Sub Search_Click()
Const n = 10
Dim a(1 To n) As Integer
Dim i As Integer, j As Integer, m As Integer, f As Boolean, key As Integer
’读取一组正整数,按上述规则存入数组 a 中。代码略
key = Val(Text1.Text)
If key Mod 2 = 1 Then i = 1 Else i = 2
j = n :f = False
Do While i <= j And Not f
If key Mod 2 = 0 Thenm = (i + j) \ 2 - (i + j) \ 2 Mod 2
Else
m = _①_______
End If
If key = a(m) Then
f = TrueElIf Then
j = m - 2
Else
i = _②____
End IfLoop
If f Then Label1.Caption = Str(m) Else Label1.Caption = "不存在"
End Sub同类型试题
y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2
y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2