• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Según las horas en la que se comprar un artículo obtienes un descuento:
    - Ropa es 16:30 a 18:00 PM = 12% | 18:00 a 21:30 PM = 8% | otros = 0%
    - Artesanía es 16:30 a 18:00 PM = 9% | 18:00 a 21:30 PM = 6% | otros = 0%
    - Libros es 16:30 a 18:00 PM = 7% | 18:00 a 21:30 PM = 4% | otros = 0%
    Mostrar monto total a pagar (incluyendo el 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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
Proceso DescuentoEnRopaArtesaniasYLibros
    total_a_pagar <- 0;
    total_descuento <- 0;
    Escribir Sin Saltar "Ingresa el valor de hora de compra:";
    Leer hora_de_compra;
    Escribir Sin Saltar "Ingresa el valor de minuto de compra:";
    Leer minuto_de_compra;
    Repetir
        Escribir Sin Saltar "Ingresa el valor de cantidad de articulos:";
        Leer cantidad_de_articulos;
        Escribir Sin Saltar "Ingresa el valor de costo del articulo:";
        Leer costo_del_articulo;
        Escribir "Selecciona el valor de articulo.";
        Escribir "    1.- Ropa";
        Escribir "    2.- Artesanía";
        Escribir "    3.- Libros";
        Escribir Sin Saltar "    :";
        Repetir
            Leer articulo;
            Si articulo<1 O articulo>3 Entonces
                Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
            FinSi
        Hasta Que articulo>=1 Y articulo<=3;
        descuento <- 0;
        subtotal <- costo_del_articulo*cantidad_de_articulos;
        Si articulo = 1 Y ((hora_de_compra = 16 Y minuto_de_compra>=30) O hora_de_compra = 17) Entonces
            descuento <- subtotal*0.12;
        FinSi
        Si articulo = 1 Y (hora_de_compra = 18 O hora_de_compra = 19 O hora_de_compra = 20 O (hora_de_compra = 21 Y minuto_de_compra<=30)) Entonces
            descuento <- subtotal*0.08;
        FinSi
        Si articulo = 2 Y ((hora_de_compra = 16 Y minuto_de_compra>=30) O hora_de_compra = 17) Entonces
            descuento <- subtotal*0.09;
        FinSi
        Si articulo = 2 Y (hora_de_compra = 18 O hora_de_compra = 19 O hora_de_compra = 20 O (hora_de_compra = 21 Y minuto_de_compra<=30)) Entonces
            descuento <- subtotal*0.06;
        FinSi
        Si articulo = 3 Y ((hora_de_compra = 16 Y minuto_de_compra>=30) O hora_de_compra = 17) Entonces
            descuento <- subtotal*0.07;
        FinSi
        Si articulo = 3 Y (hora_de_compra = 18 O hora_de_compra = 19 O hora_de_compra = 20 O (hora_de_compra = 21 Y minuto_de_compra<=30)) Entonces
            descuento <- subtotal*0.04;
        FinSi
        total_a_pagar <- total_a_pagar+subtotal;
        total_descuento <- total_descuento+descuento;
        Escribir "Valor de descuento: ", descuento;
        Escribir "Valor de subtotal: ", subtotal;
        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'
    total_a_pagar <- total_a_pagar-total_descuento;
    Escribir "Valor de total a pagar: ", total_a_pagar;
    Escribir "Valor de total descuento: ", total_descuento;
FinProceso