• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Una fábrica de fósforos realiza el conteo de la cantidad producida al día, sabiendo que 40 unidades de éstos entran en una caja y 12 cajas hacen un paquete. Ingrese desde teclado una cantidad de fósforos, luego con eso calcule cuantas cajas, cuantos paquetes, cuantas cajas sobrantes y cuantos fósforos.

1
2
3
4
5
6
7
8
9
10
11
12
Proceso PaquetesYCajasDeFosforos
    Escribir Sin Saltar "Ingresa el valor de fosforos:";
    Leer fosforos;
    fosforos_sobrantes <- fosforos MOD 40;
    cajas <- (fosforos-fosforos_sobrantes)/40;
    cajas_sobrantes <- cajas MOD 12;
    paquetes <- (cajas-cajas_sobrantes)/12;
    Escribir "Valor de cajas: ", cajas;
    Escribir "Valor de cajas sobrantes: ", cajas_sobrantes;
    Escribir "Valor de fosforos sobrantes: ", fosforos_sobrantes;
    Escribir "Valor de paquetes: ", paquetes;
FinProceso