Profº Piva - Algoritmos - Exercício 2) Tendo Base e Altura, Calcule a Área do Triângulo?

algoritmo "Area do Triangulo"


var
  h, b, area:real
inicio
  escreval ("**Calculo da area**")
 
  escreva (" Qual e o valor da base?")
  leia (b)
  escreva ("Qual e o valor da altura?")
  leia (h)
  area <- (b*h)/2
  escreval ("A area desse triangulo eh igual a")
  escreva (area)
fimalgoritmo