-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Un vendedor a realizado N ventas y desea saber cuántas fueron superiores a $800.000 pero menores que un millón y cuántas fueron iguales o superiores a un millon.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Proceso NVentas
superiores_a_1000000 <- 0;
superiores_a_800000 <- 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>800000 Y venta<1000000 Entonces
superiores_a_800000 <- superiores_a_800000+1;
FinSi
Si venta>=1000000 Entonces
superiores_a_1000000 <- superiores_a_1000000+1;
FinSi
Escribir "";
FinPara
Escribir "Valor de superiores a 1000000: ", superiores_a_1000000;
Escribir "Valor de superiores a 800000: ", superiores_a_800000;
FinProceso
superiores_a_1000000 <- 0;
superiores_a_800000 <- 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>800000 Y venta<1000000 Entonces
superiores_a_800000 <- superiores_a_800000+1;
FinSi
Si venta>=1000000 Entonces
superiores_a_1000000 <- superiores_a_1000000+1;
FinSi
Escribir "";
FinPara
Escribir "Valor de superiores a 1000000: ", superiores_a_1000000;
Escribir "Valor de superiores a 800000: ", superiores_a_800000;
FinProceso