Proceso Triangulos
inicio
entero a,b,c
Lea a
lea b
lea c
Si ((a+b<c) y (b+c<a) y (c+a<b)) entonces
Entonces
escriba "No es un Triangulo"
Sino
Si (a<>b y b<>c y c<>a) entonces
escriba "Triangulo Escaleno"
FinSi
Si (a=b y b<>c) o (b=c y c<>a) o (c=a y a<>b) entonces
escriba "Triangulo Isoceles"
FinSi
Si (a=b y b=c y c=a) entonces
escriba "Triangulo Equilatero"
FinSi
FinSi
Fin