• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Un supermercado ha implementado una promoción de descuento de las personas que van a pagar en caja. Si saca una bolita roja tendrá un descuento sobre el importe comprado del 10%, si es amarilla del 5% y si es blanca no tendrá descuento. Desarrollar el programa mientras se desee continuar. Mostrar lo siguiente:
    - Cuánto pagará cada persona.
    - Cuántas personas no tuvieron ningún descuento.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Proceso DescuentoPorBolitaRojaAmarillaBlanca2
    personas_sin_descuento <- 0;
    Repetir
        Escribir Sin Saltar "Ingresa el valor de importe de la compra:";
        Leer importe_de_la_compra;
        descuento <- 0;
        bolita <- AZAR(3);
        Si bolita = 0 Entonces
            descuento <- importe_de_la_compra*0.1;
            Escribir "Bolita roja";
        FinSi
        Si bolita = 1 Entonces
            descuento <- importe_de_la_compra*0.05;
            Escribir "Bolita amarilla";
        FinSi
        Si bolita = 2 Entonces
            Escribir "Bolita blanca";
            personas_sin_descuento <- personas_sin_descuento+1;
        FinSi
        cantidad_a_pagar <- importe_de_la_compra-descuento;
        Escribir "Valor de bolita: ", bolita;
        Escribir "Valor de cantidad a pagar: ", cantidad_a_pagar;
        Escribir "Valor de descuento: ", descuento;
        Escribir "";
        Repetir
            Escribir Sin Saltar "¿Deseas repetir el proceso? (S/N):";
            Leer tecla_repetir;
        Hasta Que tecla_repetir='s' O tecla_repetir='n' O tecla_repetir='S' O tecla_repetir='N'
    Hasta Que tecla_repetir='n' O tecla_repetir='N'
    Escribir "Valor de personas sin descuento: ", personas_sin_descuento;
FinProceso