-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Una persona debe realizar un muestreo con 50 personas para determinar el
promedio de peso de los niños, jóvenes, adultos y viejos que existen en
su zona habitacional. Se determinan las categorías, con base en la siguiente tabla:
CATEGORÍA: EDAD
Niños: 0 - 12
Jóvenes: 13 - 29
Adultos: 30 - 59
Viejos: 60 en adelante
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
30
31
32
33
34
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
30
31
32
33
34
Proceso PromedioDePeso
promedio_adultos <- 0;
promedio_jovenes <- 0;
promedio_ninos <- 0;
promedio_viejos <- 0;
Para i<-1 Hasta 50 Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de edad:";
Leer edad;
Escribir Sin Saltar "Ingresa el valor de peso:";
Leer peso;
Si edad>=0 Y edad<=12 Entonces
promedio_ninos <- promedio_ninos+peso;
FinSi
Si edad>=13 Y edad<=29 Entonces
promedio_jovenes <- promedio_jovenes+peso;
FinSi
Si edad>=30 Y edad<=59 Entonces
promedio_adultos <- promedio_adultos+peso;
FinSi
Si edad>=60 Entonces
promedio_viejos <- promedio_viejos+peso;
FinSi
Escribir "";
FinPara
promedio_adultos <- 100.0*promedio_adultos/50;
promedio_jovenes <- 100.0*promedio_jovenes/50;
promedio_ninos <- 100.0*promedio_ninos/50;
promedio_viejos <- 100.0*promedio_viejos/50;
Escribir "Valor de promedio adultos: ", promedio_adultos;
Escribir "Valor de promedio jovenes: ", promedio_jovenes;
Escribir "Valor de promedio ninos: ", promedio_ninos;
Escribir "Valor de promedio viejos: ", promedio_viejos;
FinProceso
promedio_adultos <- 0;
promedio_jovenes <- 0;
promedio_ninos <- 0;
promedio_viejos <- 0;
Para i<-1 Hasta 50 Con Paso 1 Hacer
Escribir "PROCESO ", i;
Escribir Sin Saltar "Ingresa el valor de edad:";
Leer edad;
Escribir Sin Saltar "Ingresa el valor de peso:";
Leer peso;
Si edad>=0 Y edad<=12 Entonces
promedio_ninos <- promedio_ninos+peso;
FinSi
Si edad>=13 Y edad<=29 Entonces
promedio_jovenes <- promedio_jovenes+peso;
FinSi
Si edad>=30 Y edad<=59 Entonces
promedio_adultos <- promedio_adultos+peso;
FinSi
Si edad>=60 Entonces
promedio_viejos <- promedio_viejos+peso;
FinSi
Escribir "";
FinPara
promedio_adultos <- 100.0*promedio_adultos/50;
promedio_jovenes <- 100.0*promedio_jovenes/50;
promedio_ninos <- 100.0*promedio_ninos/50;
promedio_viejos <- 100.0*promedio_viejos/50;
Escribir "Valor de promedio adultos: ", promedio_adultos;
Escribir "Valor de promedio jovenes: ", promedio_jovenes;
Escribir "Valor de promedio ninos: ", promedio_ninos;
Escribir "Valor de promedio viejos: ", promedio_viejos;
FinProceso