Question

Выведите на экран значение логического выражения, которое принимает значение true, если треугольник со сторонами a, b, cявляется равнобедренным, и false – в противном случае.

Answer 1

Var a,b,c:real;
begin
readln(a,b,c);
if (a=b) or (b=c) or (a=c) then writeln('true')
else writeln('false');
end.