Algoritmo:
Área de um triângulo equilátero: recebendo apenas uma informação de apenas um lado a.
1. algoritmo "Cálculo da área"
2. var
3. a,h,area:real
4. inicio
5. escreval("Cálculo da área")
6. escreva("Digite o valor de um lado do triângulo - ")
7. leia(a)
8. h <- (a*raizq(3)/2)
9. area <- (a*h)/2
10. escreval("Área desse triângulo é igual a ",área:5:2)
11. escreva("*** F I M ***")
12. fimalgoritmo
Nenhum comentário:
Postar um comentário