Составьте алгоритм, с помощью которого можно определить, является ли треугольник с заданными длинами сторон a, b, c равнобедренным. (в виде ветвления)

Предыдущий
вопрос Следующий
вопрос

Program treygol;

Var a,b,c:Integer;

Begin

write('Введите стороны треугольника через пробел: ');

read(a,b,c);

if (a=b) or (a=c) or (b=c) then writeln('Треугольник равнобедренный !')

else writeln('Трегольник не равнобедренный');

end.