Павлин
7 год назад
Найти все натуральные числа а, b и с из интервала от 1 до 20, для которых выполняется равенство: a+b = c
(составить программу на языке программирования)
ОТВЕТЫ
Giimobede
Jul 18, 2019
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.
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.
81
Смежные вопросы:
