Ordenar Matriz bidimensional em Pascal

Boas , tenho um problema.
Tenho de ordenar os dados aleatórios que este código me dá.

Program Pzim ;
Var numeros:array[1..3,1..3] of integer;
i,j,num:integer;
Begin
For i:=1 to 3 do
begin
for j:=1 to 3 do
begin
numeros[i,j]:=random(50);
end;
end;
For i:=1 to 3 do
begin
for j:=1 to 3 do
begin
Write(numeros[i,j],' ');
end;
writeln(' ');
end;
End.
Tem de ser ordenando ou com o Bubble Sort ou Select Sort.

Se alguém me puder ajudar agradeço.
 
Back
Topo