Форум программистов
 
Регистрация на форуме тут, о проблемах пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль

Купить рекламу на форуме 15-35 тыс рублей в месяц

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы Поиск в этой теме
Старый 27.12.2010, 07:39   #1
Zhasik
Пользователь
 
Регистрация: 27.12.2010
Сообщений: 18
По умолчанию дружественные числа

Два числа называют дружественными, если каждое из них равно сумме всех
делителей другого, кроме самого этого числа. Например, 220 и 284 есть
дружественные числа, т. к. делителями первого являются числа
1, 2, 4, 5, 10, 11, 20, 22, 44, 55 и 110, сумма которых равна 284,
а делителями второго - числа 1, 2, 4, 71 и 142, которые в сумме дают 220.
Напишите программу для отыскания 15 других дружественных чисел.
Zhasik вне форума Ответить с цитированием
Ответ
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Дружественные числа xOffSide Общие вопросы C/C++ 4 16.08.2011 12:07
Вычислить:у=а*(в*в*в)*с,где а,в,с-двоичные числа.Для хранения числа использ.массив! Таняпервокурсница Помощь студентам 4 04.06.2010 12:08
Дружественные функции и классы Opiym Помощь студентам 1 05.04.2010 21:51
ДАНЫ 4 ЧИСЛА X Y Z W составит программу найти произведение все положительные нечетные числа Woland-itn Паскаль, Turbo Pascal, PascalABC.NET 3 23.03.2008 21:49