• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Un cliente, por campaña navideña, desea comprar panetones, donde según su marca tiene un precio:

    Marca del Panetón | Precio Unitario
    D'Onofrio | 20
    Motta | 19
    Todinno | 18
    Naval | 9
    Santa Claus | 11
    Doña Pepa | 10

    Si el cliente desea comprar más de 20 panetones de una misma marca, se le aplicará un descuento del 10% sobre el monto de la compra, obteniendo así el neto, que es la diferencia entre el monto y el descuento.
    Ingrese por teclado el nombre del cliente, la marca del panetón y la cantidad de panteones a comprar; visualice el precio unitario del panteón, el monto de la compra, el descuento y el neto 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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
Proceso CompraDePanetones
    Escribir Sin Saltar "Ingresa el valor de cantidad:";
    Leer cantidad;
    Escribir "Selecciona el valor de marca del paneton.";
    Escribir "    1.- D'Onofrio";
    Escribir "    2.- Motta";
    Escribir "    3.- Todinno";
    Escribir "    4.- Naval";
    Escribir "    5.- Santa Claus";
    Escribir "    6.- Doña Pepa";
    Escribir Sin Saltar "    :";
    Repetir
        Leer marca_del_paneton;
        Si marca_del_paneton<1 O marca_del_paneton>6 Entonces
            Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
        FinSi
    Hasta Que marca_del_paneton>=1 Y marca_del_paneton<=6;
    precio_unitario <- 0;
    Si marca_del_paneton = 1 Entonces
        precio_unitario <- 20;
    FinSi
    Si marca_del_paneton = 2 Entonces
        precio_unitario <- 19;
    FinSi
    Si marca_del_paneton = 3 Entonces
        precio_unitario <- 18;
    FinSi
    Si marca_del_paneton = 4 Entonces
        precio_unitario <- 9;
    FinSi
    Si marca_del_paneton = 5 Entonces
        precio_unitario <- 11;
    FinSi
    Si marca_del_paneton = 6 Entonces
        precio_unitario <- 10;
    FinSi
    monto_de_la_compra <- precio_unitario*cantidad;
    Si cantidad>20 Entonces
        descuento <- monto_de_la_compra*0.1;
    SiNo
        descuento <- 0;
    FinSi
    neto_a_pagar <- monto_de_la_compra-descuento;
    Escribir "Valor de descuento: ", descuento;
    Escribir "Valor de monto de la compra: ", monto_de_la_compra;
    Escribir "Valor de neto a pagar: ", neto_a_pagar;
    Escribir "Valor de precio unitario: ", precio_unitario;
FinProceso