Найти все натуральные числа а, b и с из интервала от 1 до 20, для которых выполняется равенство: a+b=c (составить программу на языке программирования)
Найти все натуральные числа а, b и с из интервала от 1 до 20, для которых выполняется равенство: a+b=c
(составить программу на языке программирования)
Гость
Ответ(ы) на вопрос:
Гостьbegin
for a:= 1 to 20 do
for b:= 1 to 20 do
for c:= 1 to 20 do
begin
if a*a+b*b=c*c then
writeln(a:4,b:4,c:4);
end;
end.
Не нашли ответ?
Похожие вопросы