• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Determina cuánto se debe pagar por equis cantidad de lápices considerando que si son 1000 o más el costo es de 85¢; de lo contrario, el precio es de 90¢.

1
2
3
4
5
6
7
8
9
10
11
12
Proceso PagoPorEquisCantidadDeLapices
    Escribir Sin Saltar "Ingresa el valor de cantidad de lapices:";
    Leer cantidad_de_lapices;
    Si cantidad_de_lapices>1000 Entonces
        costo <- 0.85;
    SiNo
        costo <- 0.9;
    FinSi
    pago <- costo*cantidad_de_lapices;
    Escribir "Valor de costo: ", costo;
    Escribir "Valor de pago: ", pago;
FinProceso