Developing.ru

Кто знает как решить её, пожалуйста не оставьте без внимания
[Pascal] Найти натуральное число от 1 до 10000 с максимальной суммой делителей.

1. Почему такое количество народу упорно игнорирует раздел "Решите мне задачку"?
2. "Уж сколько раз твердили миру", что темы надо называть осмысленно. Название "Найти число с максимальной суммой делителей" вполне бы подошло.
3. Вкратце как решать: сделать цикл по i по всем числам от 1 до 10000. Для каждого числа i сделать цикл по х всем числам от 1 до i/2. Если число i нацело делится на х (например, if i mod x=0), то добавить число х к сумме делителей числа i. Если сумма делителей для этого числа превосходит текущий максимум (в начале программы - 0), то запоминаем это число и его максимум и продолжаем цикл.

Хыиуду, можно занести все максимумы в массив и после всех действий устроить поиск по массиву.

Хотя признаю, этот метод более долгий и не самый оптимальный, но мне кается и так может сойти!