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 ou peso ideal da mulher = (62,1 x altura) – 44,77. O algoritmo deve, também, informar se a pessoa está abaixo ou acima de seu peso ideal e m quantos quilos.

algoritmo “Calcula o peso”
var
altura,peso,pesoideal:real
sexo,masculino,feminino:literal
inicio
  escreva (“Digite a altura em metros:”)
  leia (altura)
  escreva (“Digite o peso em quilos:”)
  leia (peso)
  escreva (“Digite o sexo:”)
  leia (sexo)
  se(sexo = “masculino”)entao
    pesoideal<-((72.7*altura)-58)
    se(pesoideal=peso)entao
      escreva(“Seu peso ideal é de”,pesoideal,”.Este é seu peso ideal.”)
    senao
      se (pesoideal>peso)entao
        escreva(“Seu peso ideal é de”,pesoideal,”.Você está abaixo do peso.”)
      senao
        se (pesoideal
          escreva(“Seu peso ideal é de”,pesoideal,”.Você está acima do peso.”)
        fimse
      fimse
    fimse
  senao
      pesoideal<-((62.1*altura)-44.77)
      se(pesoideal=peso)entao
        escreva(“Seu peso ideal é de”,pesoideal,”.Este é seu peso ideal.”)
      senao
        se (pesoideal>peso)entao
          escreva(“Seu peso ideal é de”,pesoideal,”.Você está abaixo do peso.”)
        senao
          se (pesoideal
            escreva(“Seu peso ideal é de”,pesoideal,”.Você está acima do peso.”)
          fimse
        fimse
      fimse
  fimse
fimalgoritmo