SLE_Practica52_PushPop

/* Llenar dos pilas de 10 elementos aleatorios de tipo entero, generar una tercera pila con la combinación de ambas,
    introduciendo primero las de la pila 1 y después los de la pila 2.
   Utilizando la operación PUSH y POP para el manejo de las tres pilas, mostrar el resultado de la pila 3

*/

var
    pila1, pila2: vector [10] numerico
    pila3: vector[20] numerico
    tope1, tope2, tope3: numerico
    i, elemento: numerico

inicio
   cls()
    tope1 = 0
    tope2 = 0
    tope3 = 0

    // Llenar la pila1 con 10 elementos aleatorios
    imprimir ("PILA1:\n")
    desde i=1 hasta 10 {
        si (tope1 < 10) {
            tope1 = tope1 + 1
            pila1[tope1] = random(100) // Generar números aleatorios entre 1 y 100
                imprimir ("\n Pila1: ",i," - ", pila1[tope1])
         sino
            imprimir("\nLa pila1 está llena.")
        }
    }


    // Llenar la pila2 con 10 elementos aleatorios
   imprimir ("\n\nPILA2:\n")
    desde i=1 hasta 10 {
        si (tope2 < 10) {
            tope2 = tope2 + 1
            pila2[tope2] = random(100) // Generar números aleatorios entre 1 y 100
                imprimir ("\n Pila2: ",i," - ", pila2[tope2])
         sino
            imprimir("\nLa pila2 está llena.")
        }
    }

    // Transferir elementos de pila1 a pila3
   //imprimir ("\n\nPILA3:\n")
    mientras (tope1 > 0) {
        elemento = pila1[tope1]
        tope1 = tope1 - 1

        si (tope3 < 20) {
            tope3 = tope3 + 1
            pila3[tope3] = elemento
         sino
            imprimir("\nLa pila3 está llena.")
        }
    }

    // Transferir elementos de pila2 a pila3
    mientras (tope2 > 0) {
        elemento = pila2[tope2]
        tope2 = tope2 - 1

        si (tope3 < 20) {
            tope3 = tope3 + 1
            pila3[tope3] = elemento
         sino
            imprimir("\nLa pila3 está llena.")
        }
    }

    // Desplegar los elementos de la pila3
    imprimir("\nElementos en la pila3:")
    mientras (tope3 > 0) {
        imprimir(pila3[tope3])
        tope3 = tope3 - 1
    }
fin