Miguel.Marques
Membro
Boas , tenho um problema.
Tenho de ordenar os dados aleatórios que este código me dá.
Se alguém me puder ajudar agradeço.
Tenho de ordenar os dados aleatórios que este código me dá.
Program Pzim ;
Var numeros:array[1..3,1..3] of integer;
Tem de ser ordenando ou com o Bubble Sort ou Select Sort.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.
Se alguém me puder ajudar agradeço.