Упорядочить по возрастанию элементы каждой строки матрицы размером n х n.

Это на одномерный масив:
Program Sort;
Const
Nmax = 100;
Var
X : Array [1..Nmax] Of Real;
A : Real;
n, k, i : Integer;

Begin
Writeln('Введите количество чисел');
Readln(n);
Writeln('Введите массив чисел');
For i := 1 To n Do Read (X[ i ]);
{ Сортировка }
For k := 1 To n-1 Do
For i := 1 To n-1 Do
If X[ i ] > X[ i+1 ] Then
Begin
A:=X[ i ];
X[ i ]:=X[ i+1 ];
X[ i+1 ]:=A
End;
Writeln('Отсортированный массив чисел: ');
For i:=1 To n Do
Write (X[ i ]);
End.

Это на двохмерный:
const n=4;
var
intArray: array [1..n, 1..n] of integer;
ii, jj, kk: integer;
tempI: integer;

begin
randomize;
for ii:=1 to n do
begin
for jj:=1 to n do
begin
intArray[ii,jj] := random(100);
write(intArray[ii,jj]:2, ' ');
end;
writeln;
end;

for jj:=1 to n do
begin
for kk:=jj to n do
begin
if intArray[1,jj] > intArray[1,kk] then
begin
for ii:=1 to n do
begin
tempI:=intArray[ii,kk];
intArray[ii,kk] := intArray[ii,jj];
intArray[ii,jj] := tempI;

end;
end;
end;
end;

writeln;
writeln;
for ii:=1 to n do
begin
for jj:=1 to n do
begin
write(intArray[ii,jj]:2, ' ');
end;
writeln;
end;
read;
end.

n x n? Запросто.
Вот m x m - это посерьезнее будет.
Пиши.

круто

используй пузырьковый алгоритм