Prof. Luiz Claudio: Atividade - Cálculo do IMC (Índice de Massa Corporal)

Através do índice de massa corporal(IMC), pode-se estimar se uma pessoa está acima do peso ideal(obesa). A vantagem do uso do IMC é que seu cálculo é simples, rápido e não requer nenhum equipamento especial, porém, devido a sua simplicidade e por não levar em conta o porte da pessoa entre outros, não pode ser considerado um meio livre de erros. O IMC também não pode distingüir as proporções de músculos, gordura, ossos e água no corpo. Portanto, seu uso não é recomendado para atletas e crianças, por exemplo.

Apesar dessas desvantagens, o índice de massa corporal vem sendo usado pela Organização Mundial de Saúde como ferramenta para estatísticas sobre obesidade no mundo.

Alguns Links onde você pode realizar o cálculo do IMC:

http://www1.folha.uol.com.br/folha/equilibrio/corpo/2001-calculadora_imc.shtml

http://www.dietaesaude.org/calculo-imc-indice-de-massa-corporal.php

ATIVIDADE:

Desenvolva um programa de computador, utilizando a linguagem Pascal para calcular o IMC de uma pessoa qualquer, conforme a tabela abaixo, quando terminar a atividade chame o professor

OBS: Desenvolvemos o algorítmo do IMC em sala de aula, conforme abaixo, isso pode auxilia-los na construção do Programa

algoritmo "IMC"

// Função : Cálculo do IMC

// Autor : Luiz Claudio Ferreira de Souza

// Data : 19/1/2011

// Seção de Declarações

var

Sexo:caracter

IMC:Real

Peso:Real

Altura:Real

inicio

// Seção de Comandos

Escreva("Qual seu Peso?")

Leia (peso)

Escreva ("Qual sua Altura")

Leia (Altura)

IMC:=Peso/(Altura^2)

Escreva("Qual o seu Sexo? Masculino (M), Feminino (F)")

Leia(sexo)

Se Sexo = "F" Entao

Se IMC < 19.1 Entao

Escreva("Abaixo do Peso")

fimse

Se (IMC >= 19.1) e (IMC <= 25.8) Entao

Escreva("Peso Normal")

Fimse

Se (IMC > 25.8) e (IMC <= 27.3) Entao

Escreva("Marginalmente Acima do Peso")

Fimse

Se (IMC > 27.3) e (IMC <= 31.1) Entao

Escreva("Acima do Peso Ideal")

Fimse

Se (IMC >= 19.1) e (IMC <= 25.8) Entao

Escreva("Peso Normal")

Fimse

Se IMC > 31.1 Entao

Escreva("Obesa")

Fimse

Se Sexo = "M" Entao

Se IMC < 20.7 Entao

Escreva("Abaixo do Peso")

fimse

Se (IMC >= 20.7) e (IMC <= 26.4) Entao

Escreva("Peso Normal")

Fimse

Se (IMC > 26.4) e (IMC <= 27.8) Entao

Escreva("Marginalmente Acima do Peso")

Fimse

Se (IMC > 27.8) e (IMC <= 32.3) Entao

Escreva("Acima do Peso Ideal")

Fimse

Se IMC > 32.3 Entao

Escreva("Obeso")

Fimse

fimalgoritmo

=======================================

===================================

======================

========

Logo abaixo existe um link para que você obtenha a solução que desenvolvi para a atividade proposta, sempre enfatizo que cada um raciocina de um modo. Então podemos afirmar que programas diferentes irão surgir, mas o que importa é que o objetivo da terefa seja desenvolvida!

Programa que desenvolvi (Clique aqui e obtenha-o)

Imagem do Programa

Abaixo estou postando os componentes que utilizei do Lazarus, é somente para mostrar quais eu utilizei para entender melhor as linhas de código do programa aqui postado. Não quer dizer que você deva utilizar os mesmos, mas deve ter cuidado para saber quais você está fazendo referencia em seu programa.