Составить программу для Pascal ABC, печатающую значение true, если указанное высказывание является истинным, и false в противном случае, когда данная
5-9 класс
|
тройка натуральных чисел a, b, c является тройкой Пифагора, т.е. c^2 = a^2 + b^2.
uses crt;
var
t1:boolean;
a, b, c: integer;
begin
readln(a, b, c);
if c*c=a*a+b*b then t1:= true else t1:= false;
writeln (t1);
readkey;
end.
Другие вопросы из категории
1)Найти наибольшее среди 2 чисел
2)Для чисел a,b,c,d вывести на экран полусумму наибольшего и наименьшего из них.
Напишите пожалуйста программы для этих задач.
Читайте также
оканчивается нулем.
ПАСКАЛЬ
числа N является четным числом
ПРОШУУ ПОМОГИТЕ ПОЖАЛУЙСТА(((РЕШАТЬ НА ПАСКАЛЕ..
а)точка с координатами (х,у) принадлежит части плоскости, лежащей между прямыми
х=m,х=n (m<n);
б)данная тройка натуральных чисел a,b,c является тройкой Пифагора, т.е. c^2=a^2+b^2;
в)данные числа х,у являются координатами точки, лежащей в первой координатной четверти;
и оканчивается нулем.
нужно составить программу , печатающее значение true, если указанное выражение является истинным, и fase в противном случае
Главное программу! Будьте добры