Ordenamiento de números de mayor a menor con el método de la burbuja

Lenguaje

PSeInt (Pseudocódigo)
Descripción

Pide al usuario 10 números, los guarda en un arreglo, ordena el arreglo de mayor a menor con el método de la burbuja y muestra el arreglo ordenado.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

Algoritmo ProcesoBurbujaReversa

    n<-10;

    Dimension numeros(n);

    Para i<-1 Hasta n Con Paso 1 Hacer

        Escribir Sin Saltar "Ingrese el valor del elemento ", i, ": ";

        Leer numeros(i);

    FinPara

    Para i<-2 Hasta n Con Paso 1 Hacer

        Para j<-1 Hasta n-i+1 Con Paso 1 Hacer

            Si numeros(j)<numeros(j+1) Entonces

                aux<-numeros(j);

                numeros(j)<-numeros(j+1);

                numeros(j+1)<-aux;

            FinSi

        FinPara

    FinPara

    Escribir "";

    Escribir "Números ordenados descendentemente:";

    Para i<-1 Hasta n Con Paso 1 Hacer

        Escribir "[", i, "]: ", numeros(i);

    FinPara

FinAlgoritmo