Algoritmo identifica o tipo de triângulo




// Função : triangulos
// Seção de Declarações

var
a,b,c : real
inicio
// Seção de Comandos
escreva("entre com o valor de a: ")
leia(a)
escreva("entre com o valor de b: ")
leia(b)
escreva("entre com o valor de c: ")
leia(c)

se (A
escreval("Estes valores formam um triangulo")

se (A=B) e (B=C) entao
escreva ("Triangulo Equilátero")
senao
se (A=B) ou (B=C) ou (A=C) entao
escreva ("Triângulo Isósceles")
senao
escreva ("Triangulo Escaleno")
fimse
fimse
senao
escreva ("Estes valores não formam um triângulo")
fimse

fimalgoritmo

Nenhum comentário:

Postar um comentário