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