triângulo

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "triângulo"
// Função : verificar se os lados podem ser um triângulo
// Autor : Edson
// Data : 16/08/2015
// Seção de Declarações 
var
 a,b,c:real
inicio
// Seção de Comandos 
escreval("digite os valores de a,b e c")
leia(a)
leia(b)
leia(c)
se (a<b+c) ou (b<a+c) ou (c<b+a)entao
escreval("é um triângulo")
se (a=b) e (b=c)entao
escreval("é um triângulo equilátero")
senao
se ((a=b) e (b<>c))ou((a=c) e (c<>b))ou ((b=c)e (c<>a))entao
escreval("é um triângulo isósceles")
senao
escreval("triângulo escaleno")
fimse
fimse
senao
escreva("não é um triângulo")
fimse
fimalgoritmo