Profº Piva - Algoritmos - Exercícios Capítulo 3.13) Escreva um algoritmo que leia a altura (em metros), o peso (em quilogramas) e o sexo (“MASCULINO” ou “FEMININO”) e calcule seu peso ideal, dado por peso ideal do homem = (72,7 x altura) – 58 --> (3.3) ou peso ideal da mulher = (62,1 x altura) – 44,77 --> (3.4) O algoritmo deve, também, informar se a pessoa está abaixo ou acima de seu peso ideal e m quantos quilos.

algoritmo "Calculo Peso Ideal"
var
  altura,peso,pesoideal,amais,amenos:real
  sexo:literal
 
inicio
  escreval (" Calcule seu peso ideal, dado por peso ideal do homem =(72,7 x altura) – 58")
  escreval (" peso ideal da mulher = (62,1 x altura) – 44,77")
  escreval ("Digite sua altura")
  leia (altura)
  escreval ("Digite seu peso")
  leia (peso)
  escreval ("Digite seu sexo")
  leia (sexo)
  se ((sexo="FEMININO") ou (sexo="F")) entao
  pesoideal <- ((62.1*altura)- 44.77)
  senao
  pesoideal<- ((72.7*altura)-58)
  fimse
  se(peso>pesoideal) entao
  amais<-peso-pesoideal
  escreval ("Seu peso ideal eh igual a", pesoideal," e você esta acima do peso ideal, em ", amais:5:2, "kilos")
  senao
  se(pesoideal>peso)entao
  amenos<-pesoideal-peso
  escreval ("Seu peso ideal eh igual a", pesoideal," e você esta abaixo do peso ideal, em ", amenos:5:2 , "kilos")
  senao
  escreval("Você está no seu peso ideal,,,, parabéns!!!!!!!!!!!!")
  fimse
  fimse
 
fimalgoritmo