Составьте программу позволяющую определить являются ли числа a, b, c пифагоровыми тройками.

285

326

Посмотреть ответы 2

Ответы на вопрос:

Misha45456

Информатика

4,7(12 оценок)

Var a, b, c: real; begin writeln('введите числа a, b, c'); 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.