Facebook
From PatrĂ­cia, 3 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 52
  1. Inicio
  2.  
  3. peso, altura, IMC, REAL
  4.  
  5. ESCREVER "Insira o seu peso, por favor"
  6. LER     peso
  7.  
  8. ESCREVER "Insira a sua altura, por favor"
  9. LER altura
  10.  
  11. IMC<= peso/(altura*altura)
  12.  
  13.  
  14. se IMC <= 18.5
  15.         escrever "Abaixo do peso normal"
  16.    
  17. senao
  18.         se IMC ]18.5,25]
  19.         escrever "Peso normal"
  20.            
  21.     senao
  22.         se IMC ]25,30]
  23.                 escrever "Acima do peso normal"
  24.         senao
  25.                 escrever "Obesidade"
  26.            
  27.         fimse
  28.     fimse
  29. fimse
  30.  
  31.  
  32. Fim