Форум программистов, компьютерный форум, киберфорум
Hadros
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  

Варианты

Запись от Hadros размещена 17.11.2015 в 22:00
Показов 723 Комментарии 0
Метки delphi

Эта запись является продолжением записи Вступление

Вижу два варианта решения:
  1. Делать ходы на поле, пока не упрёмся в невозможность сделать очередной ход, или пока не выиграем. В случае невозможности хода нужно вернуться на ход назад и сделать другой ход. Так мы находим одно первое попавшееся решение, или определяем, что решений нет.
  2. Сразу сделать все возможные ходы и сохранить полученные состояния в массив. Сделать все возможные ходы, беря за начало каждое из состояний в массиве, и сохранить полученные состояния в следующий массив. Повторять, пока не получим массив, в котором каждое состояние представляет из себя одну клетку на всём поле (или пока не получим пустой массив, если головоломка изначально не имела решения). Так находим все возможные состояния, по которым можно затем восстановить все возможные решения.
Первый вариант можно чуть модифицировать. Если не останавливаться, когда на поле одна фишка, а также, сохранять весь пройденный путь (без возвратов) в момент, когда на поле только 1 фишка, то можно получить все возможные решения. Но я этим не стал заниматься.

Для удобства отладки и вообще, для большей функциональности программы, представим всё игровое поле как двумерный квадратный массив. В каждом элементе массива будет хранится состояние клетки:
- там есть фишка
- там нет фишки
- там граница поля
Чтобы получить форму креста из 80 клеток достаточно массива 12x12, но удобнее добавить с каждой стороны ещё по одной линии "границы", тогда перебор возможных ходов упростится. Выходит, нам надо массив 14x14. Для добавления ещё большей функциональности, можно округлить до 16x16. Так мы сможем задать начальное состояние в пределах квадрата 15x15, а периметр будет всегда являться границей:

Вложение 3445

Головоломка решается в общем случае для поля 15x15, на таком поле можно разместить максимум (15x15-1)=224 фишки. Максимальная "глубина" поиска решения будет 223, т.к. у нас игра должна закончится победой, когда на поле остаётся одна фишка. Это же и будет собственно длина самого решения.

Ссылки на возможные продолжения этой записи:
Вариант 1, рекурсивный перебор ходов
Вариант 2, поиск всех возможных состояний на каждой глубине (ещё не написано)
Метки delphi
Размещено в Без категории
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Всего комментариев 0
Комментарии
 
Новые блоги и статьи
Nekobox - outbounds[0].transport: unknown transport type: raw
damix 01.10.2026
Фикс ошибки Правым кликом по серверу -> отладочная информация -> edit Заменить "net": "raw", на "net": "tcp", Нажать кнопку reload.
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru