Programa em visualg para calcular o IMC

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

Algoritmo "semnome"
// Disciplina : [Linguagem e Lógica de Programação] 
// Professor : Antonio Carlos Nicolodi 
// Descrição : Aqui você descreve o que o programa faz! (função)
// Autor(a) : Nome do(a) aluno(a)
// Data atual : 17/03/2018
Var
// Seção de Declarações das variáveis 
peso, altura, imc: real
Inicio
// Seção de Comandos, procedimento, funções, operadores, etc... 
 escreval ("Quantos quilos você pesa?")
 leia (peso)
 escreval ("qual é a a sua altura?")
 leia (altura)
 imc<-(peso)/(altura^2)
 se (imc < 17) entao
 escreval ("muito abaixo do peso")
 senao
 se (imc>17) e (imc<18.5) entao
 escreval ("abaixo do peso")
 senao
 se (imc>18.5) e (imc<25) entao
 escreval ("Parabéns! você esta no peso ideal")
 senao
 se (imc>25) e (imc<30) entao
 escreval ("Você esta com sobrepeso")
 senao
 se (imc>30) e (imc<35) entao
 escreval ("obesidade")
 senao
 se (imc>35) e (imc < 40) entao
 escreval ("obesidade severa")
 senao
 escreva ("obesidade morbida")
 fimSe
 fimse
 fimse
 fimse
 fimSe
 fimSe
 escreval ("Seu IMC é ", imc:4:2)
 
Fimalgoritmo