Ebook: Учебная программа поиска дружественных чисел

Приводится исполнимый модуль учебной программы с откомментированным исходным текстом на языке xBase++, обеспечивающий поиск дружественных чисел в широком диапазоне с выводом результатов поиска в текстовый файл (пример такого файла тоже приводится). Числа j1 и j2 называются дружественными, если число j2 равно сумме делителей j1, а число j1 равно сумме делителей j2.