Из сортировки массива в сортировку матрици

[XXXimpulsXXX]

Как перейти из Сортировки массива вот такой код

procedure BinaryInsertion( var a : massiv; n : integer );

var i, j, m, L, R : integer;
x : integer;
begin

for i:=2 to n do
begin
x := a[ i ];

L:=1; R:=i;

while L<R do
begin
m := (L+R) div 2;
if a[m] <= x then L := m+1
else R := m;
end;

for j:= i downto R+1 do a[ j ] := a[ j - 1];

a[R] := x;
end;
end;

в сортировку матрицы?

[puporev]

Мне кажется чтобы не ломать голову как начать сортировку со второго элемента, и как изогнуться при переходе со строки на строку, проще развернуть матрицу в линейный массив, отсортировать и обратно свернуть в матрицу.

[PADOCTb]

нужно отсортировать строки в порядке воззрастания? если так то прото весь код сортировки нужно поместить в цикл "for p:=1 to количество_строк" и индексы ставить не a[ i ], а a[ i ,p]/
если нужно прям всю матрицу, то как я понимаю надо чтобы в верхней левой ячейки стояло самое большое число, а в нижней правой самое маленькое. тогда нужно этот же цикл сделлать внешним и индексировать внешним строки, а внутренним столбцы или наоборот.