有如下VB程序段: Const n=10
key=Val(Text1.Text)
L=1:R=n
If check(key) Then 'check(x)为自定义函数,判断x为否偶数,若是返回True,否则为False
Do While Not check(a(L))
L=L+1
Loop
Else
Do While check(a(R))
R=R-1
Loop
End If
Do While L<=R
m=(L+R)\2
If key=a(m) Then Exit Do
If key>a(m) Then
L=m+1
Else
R=m-1
End If
Loop
若数组元素a(1)到a(10)依次为“1,3,5,7,9,2,4,6,8,10”,执行以上程序段,依次对该组数据进行查找,平均查找次数(平均查找次数=总查找次数/数据总个数)为( )