-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
En cierto almacén de electrodomésticos los días lunes y miércoles todos los productos tienen un descuento del 10% sobre el precio del producto. A la hora que un cliente compre cierta cantidad de un producto le informe el valor neto a pagar. Todos los productos tienen un impuesto del IVA del 19%.
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
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
Proceso DescuentoEnAlmacenDeElectrodomesticos
Escribir Sin Saltar "Ingresa el valor de cantidad del producto:";
Leer cantidad_del_producto;
Escribir Sin Saltar "Ingresa el valor de precio del producto:";
Leer precio_del_producto;
Escribir "Selecciona el valor de dia de la semana.";
Escribir " 1.- Domingo";
Escribir " 2.- Lunes";
Escribir " 3.- Martes";
Escribir " 4.- Miércoles";
Escribir " 5.- Jueves";
Escribir " 6.- Viernes";
Escribir " 7.- Sábado";
Escribir Sin Saltar " :";
Repetir
Leer dia_de_la_semana;
Si dia_de_la_semana<1 O dia_de_la_semana>7 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que dia_de_la_semana>=1 Y dia_de_la_semana<=7;
subtotal <- precio_del_producto*cantidad_del_producto;
Si dia_de_la_semana = 2 O dia_de_la_semana = 4 Entonces
descuento <- subtotal*0.1;
SiNo
descuento <- 0;
FinSi
IVA <- (subtotal-descuento)*0.19;
neto_a_pagar <- subtotal-descuento+IVA;
Escribir "Valor de IVA: ", IVA;
Escribir "Valor de descuento: ", descuento;
Escribir "Valor de neto a pagar: ", neto_a_pagar;
Escribir "Valor de subtotal: ", subtotal;
FinProceso
Escribir Sin Saltar "Ingresa el valor de cantidad del producto:";
Leer cantidad_del_producto;
Escribir Sin Saltar "Ingresa el valor de precio del producto:";
Leer precio_del_producto;
Escribir "Selecciona el valor de dia de la semana.";
Escribir " 1.- Domingo";
Escribir " 2.- Lunes";
Escribir " 3.- Martes";
Escribir " 4.- Miércoles";
Escribir " 5.- Jueves";
Escribir " 6.- Viernes";
Escribir " 7.- Sábado";
Escribir Sin Saltar " :";
Repetir
Leer dia_de_la_semana;
Si dia_de_la_semana<1 O dia_de_la_semana>7 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que dia_de_la_semana>=1 Y dia_de_la_semana<=7;
subtotal <- precio_del_producto*cantidad_del_producto;
Si dia_de_la_semana = 2 O dia_de_la_semana = 4 Entonces
descuento <- subtotal*0.1;
SiNo
descuento <- 0;
FinSi
IVA <- (subtotal-descuento)*0.19;
neto_a_pagar <- subtotal-descuento+IVA;
Escribir "Valor de IVA: ", IVA;
Escribir "Valor de descuento: ", descuento;
Escribir "Valor de neto a pagar: ", neto_a_pagar;
Escribir "Valor de subtotal: ", subtotal;
FinProceso