Надо добавить цикл так, чтобы получился полный перебор. Файл прикреплен.
Компилятор FPC.

Пишите в личку... (небольших задач хватает от 10 в месяц, можно долго сотрудничать)

romanmoz@yandex.ru