-
Lenguaje
SciLab
-
Descripción
Construir un programa que calcule el índice de masa corporal de una persona (IMC = peso [kg] / altura2 [m]) e indique el estado en el que se encuentra esa persona en función del valor de IMC:
Valor de IMC | Diagnóstico
< 16 | Criterio de ingreso en hospital
De 16 a 17 | Infrapeso
De 17 a 18 | Bajo peso
De 18 a 25 | Peso normal (saludable)
De 25 a 30 | Sobrepeso (obesidad de grado I)
De 30 a 35 | Sobrepeso crónico (obesidad de grado II)
De 35 a 40 | Obesidad premórbida (obesidad de grado III)
> 40 | Obesidad mórbida (obesidad de grado IV)
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
altura_en_m = input ("Ingresa el valor de altura en m: ");
peso_en_kg = input ("Ingresa el valor de peso en kg: ");
IMC=peso_en_kg/altura_en_m/altura_en_m;
if IMC<16 then
printf ("Criterio de ingreso en hospital.\n");
end,
if IMC>=16 & IMC<17 then
printf ("Infrapeso.\n");
end,
if IMC>=17 & IMC<18 then
printf ("Bajo peso.\n");
end,
if IMC>=18 & IMC<25 then
printf ("Peso normal (saludable).\n");
end,
if IMC>=5 & IMC<30 then
printf ("Sobrepeso (obesidad de grado I).\n");
end,
if IMC>=30 & IMC<35 then
printf ("Sobrepeso crónico (obesidad de grado II).\n");
end,
if IMC>=35 & IMC<40 then
printf ("Obesidad premórbida (obesidad de grado III).\n");
end,
if IMC>=40 then
printf ("Obesidad mórbida (obesidad de grado IV).\n");
end,
printf ("Valor de IMC: %g\n", IMC);
end
peso_en_kg = input ("Ingresa el valor de peso en kg: ");
IMC=peso_en_kg/altura_en_m/altura_en_m;
if IMC<16 then
printf ("Criterio de ingreso en hospital.\n");
end,
if IMC>=16 & IMC<17 then
printf ("Infrapeso.\n");
end,
if IMC>=17 & IMC<18 then
printf ("Bajo peso.\n");
end,
if IMC>=18 & IMC<25 then
printf ("Peso normal (saludable).\n");
end,
if IMC>=5 & IMC<30 then
printf ("Sobrepeso (obesidad de grado I).\n");
end,
if IMC>=30 & IMC<35 then
printf ("Sobrepeso crónico (obesidad de grado II).\n");
end,
if IMC>=35 & IMC<40 then
printf ("Obesidad premórbida (obesidad de grado III).\n");
end,
if IMC>=40 then
printf ("Obesidad mórbida (obesidad de grado IV).\n");
end,
printf ("Valor de IMC: %g\n", IMC);
end