• 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
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