exercicio.5

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

algoritmo "calculo da área de um retângulo"
// Autor :Marcelo Daniel Gomes
// Data : 13/03/2015
var
 base, altura, area : real
inicio
 escreva ("Informe a base do retângulo: ")
 leia (base)
 escreva ("Informe a altura do retângulo: ")
 leia (altura)
 area <- (base*altura)
 escreva ("A área do retângulo é ", area)
fimalgoritmo