Descuento y recargo en una farmacia en lenguaje PSeInt (Pseudocódigo)

Lenguaje

PSeInt (Pseudocódigo)
Descripción

Una farmacia ofrece un descuento del 3% del valor de la compra si el pago se efectúa al contado, y se el pago es con tarjeta se le recarga un 5% del valor de compra. Calcular el descuento, recargo y el total a pagar.

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

Proceso DescuentoYRecargoEnUnaFarmacia

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

    Leer compra;

    Escribir "Selecciona el valor de tipo de pago.";

    Escribir "    1.- Al contado";

    Escribir "    2.- Tarjeta";

    Escribir Sin Saltar "    :";

    Repetir

        Leer tipo_de_pago;

        Si tipo_de_pago<1 O tipo_de_pago>2 Entonces

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

        FinSi

    Hasta Que tipo_de_pago>=1 Y tipo_de_pago<=2;

    Si tipo_de_pago = 1 Entonces

        descuento <- compra*0.03;

        recargo <- 0;

    SiNo

        descuento <- 0;

        recargo <- compra*0.05;

    FinSi

    total <- compra-descuento+recargo;

    Escribir "Valor de descuento: ", descuento;

    Escribir "Valor de recargo: ", recargo;

    Escribir "Valor de total: ", total;

FinProceso