Алгоритм простой: делим сумму делителей

на само

и точно так же поступаем с остатком, пока не выйдет

. Например:




Или сокращенно:

Для каждого

такая последовательность определена однозначно, и перед нулем чаще всего оказывается единица, но не обязательно:

Последовательность явно новогодняя, и числа в таких последовательностях считаем тоже новогодними (если перед нулем не единица).
В первой сотне семь н/г чисел:

Во второй - пять:

Далее - четыре, три, а в пятой сотне снова пять:

Её спасает совершенное число

Какое может стоять в н/г последовательности перед нулем? Оказывается еще такое:

, но больше не знаю. Вот и вопрос. Предыдущее н/г число перед

-

, последующее -

. Как и четные совершенные,

- треугольное число.

, кстати, тоже треугольное число. Последний треугольный новый год справляли в далеком
1953-м. Многие форумчане тогда еще не родились. Даже из администрации. Чем сердце успокоится?
Всех с наступающим НГ! 