Skip to main content
2 de 3
formatacao
Leandro Angelo
  • 9,4mil
  • 3
  • 23
  • 35

problema de syntax error then but then

não sei oq esta acontecendo pouco then? muito then? falta (;)?

obrigado pela ajuda

  program Untitled;
    var
    peso:real;
    altura:real;
    idade:integer;
    begin
    writeln('digite seu peso');
      read(peso);
    writeln('digite sua altura');
       read(altura);
    writeln('digite sua idade');
        read(idade);
    if(peso / altura * altura <= 16)then
    
       writeln('voce esta com magreza extrema')
       else if(peso / altura * altura) >=16) and (peso / altura * altura) <=17)
    
        writeln('voce esta com magreza moderada')
    
        else if(peso / altura* altura) in (17..18.5)
             writeln('voce esta com magreza leve')
        else if(peso / altura * altura  >= 18,5) and (peso / altura * altura <= 25)
             writeln('voce esta saudavel')
        else if(peso / altura * altura >=25) and (peso / altura * altura <=30)
            writeln('voce esta com sobre peso')
        else if(peso / altura * altura >=30) and (peso / altura * altura <=35)
            writeln('voce esta com grau de obesidade I procure ajuda')
        else if(peso / altura * altura >=35) and ((peso / altura * altura <=40)
            writeln('voce esta com grau de obesidade II procure ajuda')
        else if(peso / altura * altura >=40) and (peso / altura * altura <=45)
            wirteln('voce esta com grau de obsidade III procure ajuda')
    
    
    end