Показать сообщение отдельно
  #2  
Старый 21.05.2009, 10:54
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Классическая переборная задача.
Смотри алгоритмы построения перестановок. Строишь все перестановки и суммируешь все числа в каждой, пока результат меньше заданного числа. Если он равен - то имеешь нужную комбинацию, если больше - такой комбинации нет.
Ответить с цитированием