Найти все натуральные числа а, b и с из интервала от 1 до 20, для которых выполняется равенство: a+b=c (составить программу на языке программирования)
ppn01012014
3
14.08.2019 10:40
12
Другие вопросы по теме Информатика
ЯнчикИлИоДуванчик
15.02.2022 06:18
Lana0602
15.02.2022 06:21
elinochka0707
05.05.2020 09:27
GoshaLLL
05.05.2020 09:27
KamaMIX2004
05.05.2020 09:27
Gumerova0424
18.05.2020 15:58
ZVERO9S4R
18.05.2020 15:58
жансаяболатова
18.05.2020 15:58
Популярные вопросы
- Назвіть риси фантастичної літератури Запах думки...
3 - Составить 15 тестовых вопросов по биографии и творчеству А.Твардовского....
3 - Напишите семья это отвественность, потому что во первых...во...
1 - Дайте назви речовинам: CaCO 3 ; H 2 CO 3 ; CaO; H 2 S; K 2 S;...
1 - .дыхание и питание голосеменных...
2 - Наказанным гетманом быв а Іван Скоропадський б Кирило Розумовський...
2 - ОЧЕНЬ ВАЖНЫЙ ТЕСТ, А Я НИЧЕГО НЕ ПОНИМАЮ...
3 - Улус это 6 класс(Кратко) ...
3 - 1-тапсырма. Суретке қарап, «Тату доспызбәріміз!» тақырыбында...
3 - ABO ? , БЛЛЛ )?;#-1#!#;...
2
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.