Proceso triangulo Definir a, b, c Como Real;
Escribir "Ingrese el primer lado del triángulo: ";
Leer a;
Escribir "Ingrese el segundo lado del triángulo: ";
Leer b;
Escribir "Ingrese el tercer lado del triángulo: ";;
Leer c;
Si a > 0 & b > 0 & c > 0 Entonces
Si a == b & a == c Entonces
Escribir "Triángulo equilatero";
SiNo
Si a == b | a == c | b == c Entonces
Escribir "Triángulo isóceles";
SiNo
Escribir "Triángulo escaleno";
FinSi
FinSi
SiNo
Escribir "Algunos de los datos ingresados son incorrectos";
FinSi
FinProceso