• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Pide al usuario 10 números, los guarda en un arreglo, ordena el arreglo de menor a mayor 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
24
Algoritmo ProcesoBurbuja
    Dimension numeros(10);
    n<-10;
    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:";
    Escribir "";
    Para i<-1 Hasta n Con Paso 1 Hacer
        Escribir "[", i, "]: ", numeros(i);
    FinPara
FinAlgoritmo