Descuento por bolitas de colores en lenguaje PSeInt (Pseudocódigo)

Lenguaje

PSeInt (Pseudocódigo)
Descripción

En un supermercado, se realizan descuentos por las compras a partir de unas bolitas de colores: Verde 20%, amarilla 25%, negra del 30%; la blanca no aplica ningún descuento. Leer el importe de la compra y el color de la bolita e imprimir lo que debe pagar dicho cliente.

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

Proceso DescuentoPorBolitasDeColores

    Escribir Sin Saltar "Ingresa el valor de importe de la compra:";

    Leer importe_de_la_compra;

    Escribir "Selecciona el valor de color de la bolita.";

    Escribir "    1.- verde";

    Escribir "    2.- amarilla";

    Escribir "    3.- negra";

    Escribir "    4.- blanca";

    Escribir Sin Saltar "    :";

    Repetir

        Leer color_de_la_bolita;

        Si color_de_la_bolita<1 O color_de_la_bolita>4 Entonces

            Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";

        FinSi

    Hasta Que color_de_la_bolita>=1 Y color_de_la_bolita<=4;

    descuento <- 0;

    Si color_de_la_bolita = 1 Entonces

        descuento <- importe_de_la_compra*0.2;

    FinSi

    Si color_de_la_bolita = 2 Entonces

        descuento <- importe_de_la_compra*0.25;

    FinSi

    Si color_de_la_bolita = 3 Entonces

        descuento <- importe_de_la_compra*0.3;

    FinSi

    pago <- importe_de_la_compra-descuento;

    Escribir "Valor de descuento: ", descuento;

    Escribir "Valor de pago: ", pago;

FinProceso