二分查找

二分查找二分查找 var mid,n,k,i,r,l:longint; a:array[1..10] of longint; begin readln(n,k); for i:=1 to n do read(a[i]); r:=n; l:=1; while lk then l:=mid+1 else r:=mid-1; end; end. 其中K为你要查找的数，以上程序查找你要查找的数，如果找到则L为你要查找的数的序号，如果找不到则L为序列中第一个比你要找的数小的数的序号（输入数据为倒序） 注意：二分查找必须...