Определить являеться ли треугольник со сторонами (a,b,c) равносторонним.
Вводятся три стороны?
да наверно
Var a,b,c:integer; begin readln(a,b,c); if (a=b) and (b=c) and (a=c) then write('Равносторонний') else write('Не равносторонний'); end.
Можешь мне в других вопросах помочь?,вопрос жизни и смерти...
пожпдкйста..