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;
{ 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:
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.
