VisualG IMC só aparece a primeira condicional

[Marigimenez]

algoritmo "semnome"
// Função :
// Autor :
// Data : 09/02/2022
// Seção de Declarações
var
   P, A , IMC : real

inicio
   Escreva ("Digite seu peso em kg : ")
   Leia (P)
   EscrevaL ("Digite sua altura : ")
   Leia (A)
   IMC <- P/(A*2)
   Se (IMC < 18.5) entao
      EscrevaL ("Abaixo do peso ")
   senao
      se (IMC <= 18.6) e (IMC <=24.9) entao
         EscrevaL ("Peso ideal ")
      senao
         se (IMC <= 25) e (IMC <=29.9) entao
            EscrevaL ("Sobrepeso ")
         senao
            se (IMC <= 30) e (IMC <= 39.9) entao
               EscrevaL (" Obesidade ")
            senao
               se (IMC >=40) entao
                  EscrevaL ("Obesidade mórbida ")
               FimSe
            FimSe
         FimSe
      FimSe
   FimSe
   // Seção de Comandos
fimalgoritmo

 

[Midori]

@Marigimenez No cálculo do IMC o denominador é o quadrado da altura, mas você está multiplicando por 2. Sobre a condicional, seu código só está testando o valor menor ou igual nos dois intervalos. E devia ser maior ou igual e depois menor ou igual, p.ex,

se (IMC >= 18.6) e (IMC <=24.9) entao

 

Na primeira condicional também faça menor ou igual para pegar o valor 18.5.

[Marigimenez]

@Midori Muito obrigada!