Определить,является ли треугольник со сторонами a,b,c прямоугольным или нет?(паскаль)Помогите пожалуйста:(
Определить,является ли треугольник со сторонами a,b,c прямоугольным или нет?(паскаль)
Помогите пожалуйста:(
Гость
Ответ(ы) на вопрос:
Гостьvar
a, b, c :integer;
begin
readln(a,b,c);
if (sqr(a) = sqr(b) + sqr(c)) or (sqr(b) = sqr(a) + sqr(c) or (sqr(c) = sqr(a) + sqr(b) then
writeln('Треугольник прямоугольный')
else
writeln('Треугольник не прямоугольный');
end.
Не нашли ответ?
Похожие вопросы