Exercicio 3 do caderno

calcular a area de um triangulo equilatero, dado somente a base.

algoritmo ("calculo da area")

var
  b, h, area: real

inicio

Escreval ("calculando a area de um triangulo equilatero")
escreval ("digite o valor da base")
leia (b)
h <-((b*(raizq 3)/2)
area <- ((b*h)/2)
escreva ("O valor da area eh", area: 5:2)
Fimalgoritmo