Vamos ao exercício!
Tendo como entrada de dados o nome, a altura e o
sexo de uma pessoa, construa um algoritmo que calcule
o peso ideal,
utilizando as seguintes fórmulas:
Homens: (72.7 * h) – 58
Mulheres: (62.1 * h) – 44.7
Mostrar ao Final o resultado do calculo.
PROPOSTAS DE SOLUÇÕES
Exemplo de solução utilizando pascal em Lazarus ou Delphi.
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 35 36 37 38 39 40 41 42 43 44 45 46 | program project1; uses sysutils; var altura : Real; pesoIdealH : Real; pesoIdealM : Real; nome : String; sexo : String; begin write('Informe o nome: '); ReadLn (nome); write('Informe a altura : '); ReadLn (altura); {* informe m para sexo feminino e h para sexo masculino *} write('Informe o sexo h-masculino m-feminino: '); ReadLn (sexo); if sexo = 'm' then begin pesoIdealM := (62.1 * altura) - 44.7; writeln('O seu peso ideal ', nome, ' e ', FormatFloat('#0.00', pesoIdealM)); end else begin if sexo = 'h' then begin pesoIdealH := (72.7 * altura) - 58.0; writeln('O seu peso ideal ', nome, ' e ', FormatFloat('#0.00', pesoIdealH)); end else begin writeln('Digite h para homem, se for mulher digite m'); end; end; ReadLn; end. |
Dúvidas ou sugestões? Deixe o seu Comentário!
Quer mais linguagens?
Informe nos comentários, quanto mais pedidos, mais chances
da linguagem ser colocada aqui!
Está gostando do conteúdo? Considere pagar um cafezinho para nossa equipe!
Você precisa fazer o login para publicar um comentário.
Queria ver exemplos de algorítimos que calculasse –
Probabilidades: distribuições (binominal, normal, poisson, qui-quadrado)