0
Gracias

Unas palabras de agradecimiento nunca están de más.

El Ordenamiento de Burbuja – Recursividad

En ocasiones nos interesa ordenador los datos alfabéticamente, de mayor a menor o al revés. El método de la burbuja se utiliza para recorrer un array, comparar pares de elementos y corregirlo, si por algún motivo el orden es incorrecto. En este algoritmo el dato más pequeño se desplaza al final del array.

Es considerado uno de los métodos de comparación más sencillos de implementar. En este artículo os mostramos un ejemplo de código.



Nota: Tener en cuenta que este método de ordenación puede no resultar eficiente para según qué fines.

Ordenar los datos de un array

El código es el siguiente:

Program Ordenar;

var
datos: array[1..6] of integer;
i,j: integer;
temporal: integer;

begin
datos[1] := 56;
datos[2] := 9;
datos[3] := 34;
datos[4] := 12;
datos[5] := 41;
datos[6] := 8;

{ Primero mostramos los datos }
writeLn('Los datos iniciales son: ');
for i := 1 to 6 do
write(datos[i], ' ');
writeLn;

{ Ahora ordenamos mediante burbuja }
for i := 6 downto 2 do
for j := 0 to i - 1 do
if datos[j] > datos[j + 1] then
begin
temporal := datos[j];
datos[j] := datos[j + 1];
datos[j + 1] := temporal;
end;

{ Y mostramos el resultado }
writeLn('Los datos tras ordenar son: ');
for i := 1 to 6 do
write(datos[i], ' ');
writeLn;
end.


Los datos iniciales son:

56, 9, 34, 12, 41, 8


Después de ejecutar nuestro código tendremos estos datos ordenador de menor a mayor:

8, 9, 12, 34, 41, 56


Foto: © Everypixel
0
Gracias

Unas palabras de agradecimiento nunca están de más.

Haz una pregunta
Nuestros contenidos son redactados en colaboración con expertos del ámbito tecnológico bajo la dirección de Jean-François Pillou, fundador de CCM.net y director digital en el Grupo Figaro. CCM es un sitio de tecnología líder a nivel internacional y está disponible en 11 idiomas.
El documento « El Ordenamiento de Burbuja – Recursividad » se encuentra disponible bajo una licencia Creative Commons. Puedes copiarlo o modificarlo libremente. No olvides citar a CCM (es.ccm.net) como tu fuente de información.

0 Comentario