var a,b,c,d: real;
begin
 writeln('Введите a');
 readln(a);
 writeln('Введите b');
 readln(b);
 writeln('Введите c');
 readln(c);
 if (a=b) and (b=c) and (a=c) then 
 writeln('Треугольник равнобедренный!')
 else writeln('Треугольник не является равнобедренным!');
end.