-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Un vendedor ha realizado N ventas y desea saber cuántas fueron por 10,000 o menos, cuántas fueron por más de 10,000 pero por menos de 20,000, y cuánto fue el monto de las ventas de cada una y el monto global. Determinar los totales.
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
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
Proceso TotalesDeNVentas
ventas_de_0_a_10000 <- 0;
ventas_de_10000_a_20000 <- 0;
monto_ventas_de_0_a_10000 <- 0;
monto_ventas_de_10000_a_20000 <- 0;
monto_global <- 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;
Si venta<=10000 Entonces
ventas_de_0_a_10000 <- ventas_de_0_a_10000+1;
monto_ventas_de_0_a_10000 <- monto_ventas_de_0_a_10000+venta;
FinSi
Si venta>10000 Y venta<=20000 Entonces
ventas_de_10000_a_20000 <- ventas_de_10000_a_20000+1;
monto_ventas_de_10000_a_20000 <- monto_ventas_de_10000_a_20000+venta;
FinSi
monto_global <- monto_global+venta;
Escribir "";
FinPara
Escribir "Valor de ventas de 0 a 10000: ", ventas_de_0_a_10000;
Escribir "Valor de ventas de 10000 a 20000: ", ventas_de_10000_a_20000;
Escribir "Valor de monto ventas de 0 a 10000: ", monto_ventas_de_0_a_10000;
Escribir "Valor de monto ventas de 10000 a 20000: ", monto_ventas_de_10000_a_20000;
Escribir "Valor de monto global: ", monto_global;
FinProceso
ventas_de_0_a_10000 <- 0;
ventas_de_10000_a_20000 <- 0;
monto_ventas_de_0_a_10000 <- 0;
monto_ventas_de_10000_a_20000 <- 0;
monto_global <- 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;
Si venta<=10000 Entonces
ventas_de_0_a_10000 <- ventas_de_0_a_10000+1;
monto_ventas_de_0_a_10000 <- monto_ventas_de_0_a_10000+venta;
FinSi
Si venta>10000 Y venta<=20000 Entonces
ventas_de_10000_a_20000 <- ventas_de_10000_a_20000+1;
monto_ventas_de_10000_a_20000 <- monto_ventas_de_10000_a_20000+venta;
FinSi
monto_global <- monto_global+venta;
Escribir "";
FinPara
Escribir "Valor de ventas de 0 a 10000: ", ventas_de_0_a_10000;
Escribir "Valor de ventas de 10000 a 20000: ", ventas_de_10000_a_20000;
Escribir "Valor de monto ventas de 0 a 10000: ", monto_ventas_de_0_a_10000;
Escribir "Valor de monto ventas de 10000 a 20000: ", monto_ventas_de_10000_a_20000;
Escribir "Valor de monto global: ", monto_global;
FinProceso