Определить,является ли треугольник со сторонами a,b,c равнобедренным

Он не равнобедренный,он равносторонний.
 begin readln(a);
readln(b);
readln(c);
if (a=b)or(a=c)or(b=c)
then writeln('равнобедренный')                    else writeln('неравнобедренный'); end;