ÁREA DO TRIANGULO

Algoritmo:
Área de um triângulo: receba 2 informações h altura e b base, calcule b*h/2= área total.

1.   algoritmo "Cálculo da Área"
2.   var
3.      h,b,area:real
4.   inicio
5.      escreval ("*** Cálculo da Área ***")
6.      escreva ("Digite o valor da base _ ")
7.        leia (b)
8.      escreva ("Digite o valor da altura _ ")
9.        leia (h)
10.     area <- (b*h)/2
11.     escreval("Área do triângulo é igual a ",área:5:1)
12.     escreva("*** FIM ***")
13.  fimalgoritmo