Составить программу для pascal abc, печатающую значение - вопрос №553664 от zkudaybergen 29.06.2022 17:39

Question

Информатика: Составить программу для pascal abc, печатающую значение true, если указанное высказывание является истинным, и false в противном случае, когда данная тройка натуральных чисел a, b, c является тройкой пифагора, т.е. c^2 = a^2 + b^2.

zkudaybergen · Answer

uses crt;vart1:boolean;a, b, c: integer;beginreadln(a, b, c);if c*c=a*a+b*b then t1:= true else t1:= false;writeln (t1);readkey;end....