VPF::подскажите,в чем проблема - Форум программистов

4ybaka

Дата 19.11.2007, 19:22 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 370
Регистрация: 28.4.2007

Репутация: нет
Всего: нет

пытался написать логику выбора хода в крестиках-ноликах.
есть БД:

Код


moved(1,0).
moved(2,0).
moved(3,0).
moved(4,0).
moved(5,0).
moved(6,1).
moved(7,0).
moved(8,0).
moved(9,0).

near(1,2).
near(1,8).
near(1,9).
near(2,3).
near(2,9).
near(3,4).
near(3,9).
near(4,5).
near(4,9).
near(5,6).
near(5,9).
near(6,7).
near(6,9).
near(7,8).
near(7,9).
near(8,9).

где near - соседние клетки(нумировал по спирали по часовой стрелке).
moved - если 1, то в клетке уже есть метка.

выбор заключается в том,чтобы ставить метку в клетку,если в соседней уже есть метка.код такой:

Код


move(X):-moved(X,0),moved(Y,1),(near(X,Y);near(Y,X)).

понятно что он не оптимальный,но даже он не работает.говорит на всех наборах - false.

ЗЫ:писал под prolog.Net

--------------------

"То,что вы понимаете - это все,что вы понимаете."
Брайн Керниган

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Prolog \| Следующая тема »