var a,b,c: integer; begin writeln('Введите стороны треугольника'); readln(a,b,c); write('Треугольник '); if (a<=(b+c)) and (b<=(a+c)) and (c<=(a+b)) then begin if (a=b) or (b=c) or (a=c) then begin if (a=b) and (b=c) then writeln('равносторонний') else writeln('равнобедренный '); end else if (sqr(a)+sqr(b)=sqr(c)) or (sqr(b)+sqr(c)=sqr(a)) or (sqr(a)+sqr(c)=sqr(b)) then writeln('прямоугольный') else writeln('разносторонний'); end else writeln('не существует'); end.