-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Un proveedor de estéreos ofrece un descuento del 10% sobre el precio sin IVA, de algún aparato si este cuesta $2.000.000 o más. Además, independientemente de esto, ofrece un 5% de descuento si la marca es LG. ¿Determinar cuánto pagara, con IVA incluido, un cliente cualquiera por la compra de su aparato?
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
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
Proceso DescuentoPorCostoYMarca
Escribir Sin Saltar "Ingresa el valor de precio sin IVA:";
Leer precio_sin_IVA;
Escribir "Selecciona el valor de marca.";
Escribir " 1.- AOC";
Escribir " 2.- Daewoo";
Escribir " 3.- Fisher";
Escribir " 4.- GE";
Escribir " 5.- LG";
Escribir " 6.- Panasonic";
Escribir " 7.- RCA";
Escribir " 8.- Sanyo";
Escribir " 9.- Sony";
Escribir " 10.- Toshiba";
Escribir Sin Saltar " :";
Repetir
Leer marca;
Si marca<1 O marca>10 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que marca>=1 Y marca<=10;
descuento <- 0;
Si precio_sin_IVA>2000000 Entonces
descuento <- descuento+precio_sin_IVA*0.1;
FinSi
Si marca = 5 Entonces
descuento <- descuento+precio_sin_IVA*0.05;
FinSi
IVA <- (precio_sin_IVA-descuento)*0.16;
pago <- precio_sin_IVA-descuento+IVA;
Escribir "Valor de IVA: ", IVA;
Escribir "Valor de descuento: ", descuento;
Escribir "Valor de pago: ", pago;
FinProceso
Escribir Sin Saltar "Ingresa el valor de precio sin IVA:";
Leer precio_sin_IVA;
Escribir "Selecciona el valor de marca.";
Escribir " 1.- AOC";
Escribir " 2.- Daewoo";
Escribir " 3.- Fisher";
Escribir " 4.- GE";
Escribir " 5.- LG";
Escribir " 6.- Panasonic";
Escribir " 7.- RCA";
Escribir " 8.- Sanyo";
Escribir " 9.- Sony";
Escribir " 10.- Toshiba";
Escribir Sin Saltar " :";
Repetir
Leer marca;
Si marca<1 O marca>10 Entonces
Escribir Sin Saltar "Valor incorrecto. Ingrésalo nuevamente.: ";
FinSi
Hasta Que marca>=1 Y marca<=10;
descuento <- 0;
Si precio_sin_IVA>2000000 Entonces
descuento <- descuento+precio_sin_IVA*0.1;
FinSi
Si marca = 5 Entonces
descuento <- descuento+precio_sin_IVA*0.05;
FinSi
IVA <- (precio_sin_IVA-descuento)*0.16;
pago <- precio_sin_IVA-descuento+IVA;
Escribir "Valor de IVA: ", IVA;
Escribir "Valor de descuento: ", descuento;
Escribir "Valor de pago: ", pago;
FinProceso