Паскаль через вложенные циклы
Два натуральных числа называются дружественными, если каждое из них
равно сумме всех делителей другого (само другое число в качестве делителя
не рассматривается). Найти все пары натуральных дружественных чисел,
меньших 50 000.