Найти все натуральные числа а, b и с из интервала от 1 до 20, для которых выполняется равенство: a+b=c
(составить программу на языке программирования)

beginfor a:= 1 to 20 dofor b:= 1 to 20 dofor c:= 1 to 20 dobeginif a*a+b*b=c*c thenwriteln(a:4,b:4,c:4);end;end.