Ответ:
var a, b, c: integer;begin
readln(a, b, c);
if (a + b <= c) or (b + c <= a) or (a + c <= b) then</p>
writeln('Не существует')
else if(a = b)and(b = c) then
writeln('Равносторонний')
else if(a = b)or(b = c)or(a = c) then
writeln('Равнобедренный')
else
writeln('Разносторонний')
end.
Объяснение:
Всё строится на проверках длин сторон, запрошенных у пользователя