Hola, quería saber si me podrian pasar un algoritmo de ordenamiento de numeros en un array, yo lo necesito en pascal, pero bueno si no puede ser así pasenló en cualkier lenguaje y yo l o porto.
Por cierto según mi intuicion puede haber dos metodos de ordenado, uno que ordene un array que ya contenga los numeros, y otro que los vaya ordenando a medida que los insertás... no??? Bueno cualquiera sea la forma si lo saben posteen!
Acá tengo algo que estuve haciendo pero obviamente no funciona!!!
program tempe;
var
temp:array[0..6] of integer;
i,x,aux:integer;
begin
for i:=0 to 6 do
begin
writeln('');
write('Escribe un nro entero: ');
readln(temp[i]);
end;
for i:=0 to 5 do
begin
if(temp[i]>temp[i+1]) then
begin
for x:=0 to 5 do
begin
if(temp[x]>temp[x+1]) then
begin
aux := temp[x];
temp[x] := temp[x+1];
temp[x+1] := aux;
end;
end;
end;
end;
for i:=0 to 6 do
begin
writeln(temp[i]);
end;
end.
Desde ya muchas gracias!
