tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Другие предметы
Натуральные числа а, b, с называются
Натуральные числа а, b, с называются числами Пифагора, если выполняется условие а2 + b2 = с2. Напечатать все числа Пифагора (программа Паскаль)
sahin123321
1 16.04.2019 23:00
12
Ответы
LB1621
16.04.2019 23:00
var
a,b,n:integer;
begin
readln(n);
for a:=1 to n-1 do
for b:=1 to n-1 do
if (sqrt (a*a+b*b)=int( sqrt (a*a+b*b))) and( sqrt (a*a+b*b)<n) then writeln (a,' ',b,' ',trunc(sqrt(a*a+b*b)));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы
kamakiko11
20.12.2020 12:55
Разрешите конфликтную ситуацию, используя стратегии: сотрудничество, уступчивость, компромисс, принуждение, при Вам предстоит сдавать экзамен и вдруг преподаватель предлагает...
L00KING
20.12.2020 12:56
Как описать натюрморт по формы и факторы вещи(ниже примеры натюрмотртов)...
qqvikaglazynova
14.07.2022 11:10
Яку функцію виконує креслення в процесі роботи дизайнера?...
Antyan11
14.05.2020 16:56
Черчение 7 класс. Не понимаю как сделать описание чертежа Надо до завтра сдать, или я буду не аттестован...
віка189
14.05.2020 16:56
Соціальне становище лейзер вольфа и цейтл. Чи жалкував Тев є, що видав старшу доньку за бідного кравця?...
dashazoriksv
13.05.2020 19:47
Выберите правильные варианты ответов. Выберите правила при нагрузках. Регулярные нагрузки Стараться не давать нагрузки Выполнение сложных упражнений сразу Разнообразная...
svetlans2
13.05.2020 19:47
Findet im Text deutsche Äquivalente. 1.Однажды художник сидел в лесу на берегу реки и прилежно рисовал. 2.Но мама медведица не видела художника и спокойно шла к реке. 3.Другой...
Margarita11mm
13.05.2020 19:47
Атпен көрші ауылға бара жатқанмын. Кенет атым үрікті. Ат ер қанат. Ат үріккен жаққа қарадым. Бір үйрек тұзақа түсіп қалыпты. Үйректі...
KateHe
13.05.2020 19:47
В Израиле 21 апреля в 10 часов утра по всей стране звучит сирена. Замирает всё. Люди прекращают свои дела, останавливаются те, кто шёл или ехал, выходят из машин и автобусов...
Лилия22111048483
13.05.2020 19:47
В каком году вышел ведьмак 3 дикая охота?...
Популярные вопросы
От двух пристаней находящихся на расстоянии 510км,отплыли в 7 ч навстречу...
3
Сообщение на тему: культура петровской эпохи. 99 за правильный !...
3
А)найти число на 3 больше,чем произведение чисел 9 и 6. б)найти число...
2
384: 96 192: 48 648: 72 352*46-5840: 80 5 плюс 5 минус 10 плюс 10 плюс...
3
Во-первых спорт является самым популярным. переведите на .яз....
2
Характер митраши из рассказа кладовая солнца (несколько предложений)...
3
Ядро урана 233 u 92 превращается в результате радиоактивного распада...
1
Как стало называтся наше государство после 1922 года?...
1
Решите уравнение: а) 7y=-95,4-2y б) 5,2+0,5*(x-3)=3-0,8*(x+4) *- знак...
1
Какие бывают строения цветка, и какие они у (крестоцветных, розоцветных,паслёновых,...
3
a,b,n:integer;
begin
readln(n);
for a:=1 to n-1 do
for b:=1 to n-1 do
if (sqrt (a*a+b*b)=int( sqrt (a*a+b*b))) and( sqrt (a*a+b*b)<n) then writeln (a,' ',b,' ',trunc(sqrt(a*a+b*b)));
end.