Процедура 'вопрос' запоминает предыдущие ответы на вопросы в фактах 'запрос'(Cod,B,C). Предикат 'точное совпадение'(OldCod,Cod,N1) определяет число N1 - количество одинаковых цифр на одних и тех же позициях в Cod и OldCod. Предикат 'общие члены' определяет количество одинаковых цифр в двух предположениях, без учета их позиций. Предикат 'допустимо' проверяет, что количество "быков" и "коров" имеют допустимые значения. Предикат 'чистка' убирает из памяти перед каждой игрой старые факты 'запрос'. И, наконец, предикат 'сообщение' говорит о победе компьютера и сообщает, за сколько ходов, для этого достаточно подсчитать число запомненных фактов 'запрос'.
Вам остается только запрограммировать все недостающие предикаты. Для предиката 'запрос' необходимо еще добавить директиву компилятору
:- dynamic 'запрос'/3.
Опубликовал vovan666
May 25 2013 15:44:34 ·
0 Комментариев ·
4396 Прочтений ·
• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •
Комментарии
Нет комментариев.
Добавить комментарий
Рейтинги
Рейтинг доступен только для пользователей.
Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.
Нет данных для оценки.
Гость
Вы не зарегистрированны? Нажмите здесь для регистрации.