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

Не виден архив с программой.
Решение - перебор вариантов расстановки.
Делаешь массив в n*n элементов и начинаешь расставлять с рекурсивной проверкой по уже расставленным ферзям.

Можно для ускорения использовать эвристику - гарантированно нельзя расставить ферзи на одной линии по вертикали или по горизонтали. Т.е. ты можешь идти квадратиком (по диагонали).
Ответить с цитированием