设有二维数组R[m][n],其元素类型为ElemType，每行每列都按从小到大有序，试给出一个算法求数组中值为x的元素的行号i和列号j。设值x在R中存在要求比较次数不多于m+n次。

看今年NOIp提高组初赛完善程序最后一题。

2(矩阵中的数字） 有一个n*n（1<=n<=5000)的矩阵a，对于1<=i<n, 1<=j<n, a[i,j]<a[i+1,j], a[j,i]<a[j,i+1]。即矩阵中左右相邻的两个元素，右边的元素一定比左边的大。上下相邻的两个元素，下面的元素一定比上面的大。给定矩阵a中的一个数字k，找出k所在的行列（注意：输入数据保证矩阵中的数各不相同）。

var
    n,k,answerx,answery:integer;
    a:array[1..5000,1..5000] of integer;

Procedure FindKPosition;
var
     i,j:integer;
begin
     i:=n;
     j:=n;
     while j>0 do
     begin
          if a[n,j]<k then break;
          dec(j);
     end;
     ---------
     while a[i,j]<>k do
     begin
          while (--------) and (i>1) do dec(i);
          while (--------) and (j<=n) do inc(j);

     end;
     ---------
     ---------
end;

var
    i,j:integer;
begin
     read(n);
     for i:=1 to n do
        for j:=1 to n do
            read(a[i,j]);
     read(k);
     FindKPosition;
     writeln(answerx,' ',answery);
end.
http://www.

没找到C的。

从对角线上搜索了。