-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Para un número determinado de personas se conoce su estatura, procedencia y edad. La estatura y la procedencia se manejan de acuerdo a las siguientes convenciones:
Estatura = 1 (Alta), 2 (Baja) o 3 (Mediana).
Procedencia = 1 (Americana), 2 (Europea), 3 (Asiática) u 4 (Otra).
Determinar: el número de americanos altos, europeos bajos y asiáticos medianos.
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
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
Proceso EstaturaYProcedencia
americanos_altos <- 0;
asiaticos_medianos <- 0;
europeos_bajos <- 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 estatura:";
Leer estatura;
Escribir Sin Saltar "Ingresa el valor de procedencia:";
Leer procedencia;
Si procedencia = 1 Y estatura = 1 Entonces
americanos_altos <- americanos_altos+1;
FinSi
Si procedencia = 2 Y estatura = 2 Entonces
europeos_bajos <- europeos_bajos+1;
FinSi
Si procedencia = 3 Y estatura = 3 Entonces
asiaticos_medianos <- asiaticos_medianos+1;
FinSi
Escribir "";
FinPara
Escribir "Valor de americanos altos: ", americanos_altos;
Escribir "Valor de asiaticos medianos: ", asiaticos_medianos;
Escribir "Valor de europeos bajos: ", europeos_bajos;
FinProceso
americanos_altos <- 0;
asiaticos_medianos <- 0;
europeos_bajos <- 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 estatura:";
Leer estatura;
Escribir Sin Saltar "Ingresa el valor de procedencia:";
Leer procedencia;
Si procedencia = 1 Y estatura = 1 Entonces
americanos_altos <- americanos_altos+1;
FinSi
Si procedencia = 2 Y estatura = 2 Entonces
europeos_bajos <- europeos_bajos+1;
FinSi
Si procedencia = 3 Y estatura = 3 Entonces
asiaticos_medianos <- asiaticos_medianos+1;
FinSi
Escribir "";
FinPara
Escribir "Valor de americanos altos: ", americanos_altos;
Escribir "Valor de asiaticos medianos: ", asiaticos_medianos;
Escribir "Valor de europeos bajos: ", europeos_bajos;
FinProceso