Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
GOLUM34ruS
26.02.2022 14:11 •
Информатика
Найти все натуральные числа а, b и с из интервала от 1 до 20, для которых выполняется равенство: a+b=c (составить программу на языке программирования)
Показать ответ
Ответ:
temik2005ap08ttx
04.10.2020 18:26
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.
0,0
(0 оценок)
Популярные вопросы: Информатика
Элчанкин
08.05.2023 01:29
Написать программу для паскаль напишите программу которая сначала вводит десять чисел в одномерный массив, а затем складывает отдельно отрицательные элементы и выдает полученный...
lolipop891
22.01.2020 21:51
Как называется отдельное предписание исполнителю о выполнении некоторого законченного действия...
Msскрытность
24.06.2020 17:45
Напишите на языке c++! 1)создать игру отгадай число 2) создайте подсказку! введите число больше или меньше...
ксюша1704
13.06.2021 06:27
по pascal 1)дан массив из конечного числа элементов вывести все отрицательные элементы. 2)дан одномерный массив найти все четные элементы массива. 3)дано n целых чисел найти...
KarinkaChernov
17.10.2021 14:00
Название сказок и других произведений в которые входят имена числительные...
alyonabursina
17.10.2021 14:00
Сэтим! характеристика политико- положения сша: 1. участие в организациях. 2. выделение среди соседних стран союзных, враждебных и нейтральных государств. 3. горячие точки , угрожающие...
ИсаковД
03.11.2022 03:51
Разберитесь предложение по морфологически мы с дедушкой приглашаем тебя погостить у нас...
елена430
03.11.2022 03:51
Укажіть прискорення матеріальної точки, рівняння руху якої x=2+3t-2t^2...
djonli1
03.11.2022 03:51
Оля купила пакетик орехов когда оля съела ещё один орех и оказалось что число оставшихся орехов стало делиться на 5 сколько еще орехов надо съесть оле (как можно меньше), чтобы...
mironhik1
03.11.2022 03:51
Как арxитектурные памятники отображают силу и мощь древнего рима?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
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.