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