-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
El administrador del restaurante "Fredy's Tucán" desea saber cuánto dinero obtuvo en el día por las ventas realizadas, igualmente quiere saber el valor total de los descuentos realizados. El restaurante hizo N ventas en el día y tiene la siguiente política de descuento:
- Si la venta es menor a $200, no hay descuento.
- Si está entre $200 y $300, el descuento es del 10%.
- Si la venta es superior a $300, el descuento es del 15%.
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
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
Proceso DescuentosEnUnRestaurante
descuentos_realizados <- 0;
dinero_obtenido <- 0;
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de venta:";
Leer venta;
descuento <- 0;
Si venta>=200 Y venta<=300 Entonces
descuento <- venta*0.1;
FinSi
Si venta>300 Entonces
descuento <- venta*0.15;
FinSi
total <- venta-descuento;
dinero_obtenido <- dinero_obtenido+total;
descuentos_realizados <- descuentos_realizados+descuento;
Escribir "Valor de descuento: ", descuento;
Escribir "Valor de total: ", total;
Escribir "";
FinPara
Escribir "Valor de descuentos realizados: ", descuentos_realizados;
Escribir "Valor de dinero obtenido: ", dinero_obtenido;
FinProceso
descuentos_realizados <- 0;
dinero_obtenido <- 0;
Escribir Sin Saltar "Ingresa el valor de n:";
Leer n;
Para i<-1 Hasta n Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de venta:";
Leer venta;
descuento <- 0;
Si venta>=200 Y venta<=300 Entonces
descuento <- venta*0.1;
FinSi
Si venta>300 Entonces
descuento <- venta*0.15;
FinSi
total <- venta-descuento;
dinero_obtenido <- dinero_obtenido+total;
descuentos_realizados <- descuentos_realizados+descuento;
Escribir "Valor de descuento: ", descuento;
Escribir "Valor de total: ", total;
Escribir "";
FinPara
Escribir "Valor de descuentos realizados: ", descuentos_realizados;
Escribir "Valor de dinero obtenido: ", dinero_obtenido;
FinProceso