1. Наш канал codeby в telegram. Пишем об информационной безопасности, методах защиты информации, о программировании. Не пропускай новости с кодебай, будь в тренде ! Подробнее ...

    Скрыть объявление

Задача По Prolog

Тема в разделе "Остальные языки программирования", создана пользователем Thrillseeker, 21 апр 2013.

  1. Thrillseeker

    Thrillseeker New Member

    Репутация:
    0
    Регистрация:
    21 апр 2013
    Сообщения:
    4
    Симпатии:
    0
    Буду признателен любой помощи в решении данного задания.

    Ответьте на вопрос “Что ест моя кошка?“, если: Птицам нравятся червяки. Кошкам нравятся рыбы. Друзья
    нравятся друг другу. Моя кошка мой друг. Моя кошка ест все, что ей нравится.

    likes(symbol,symbol)
    Clauses
    likes(bird,worm).
    likes(cat,fish).
    likes(friend1,friend2).
    likes(cat,friend).

    Этот вариант работает, но преподавателя, увы, не устраивает.

    Он написал примерно следующее:
    domains
    s=symbol
    predicates
    bird(s)
    worm(s)
    cat(s)
    friend(s,s)
    fish(s)
    eat(s,s)
    like(s,s)
    prinad(s,s)
    clauses
    bird(x). worm(y):-like(x,y).
    cat(x). fish(y):-like(x,y).
    friend(x,y):-like(x,y),like(y,x).
     
  2. rrrFer

    rrrFer Гость

    Репутация:
    0
    Код:
    про друзей неправильно.
    
    friend (i, cat). % это просто факт, что мы с кошкой друзья
    
    like(cat, meat).
    like(fish, fruit). % это тоже просто факты
    
    like(A, B):- friend(A, B); friend(B, A). % правило, друзья нравятся друг другу
    
    eat(cat, X):- like(cat, X). % правило, кошка ест все что ей нравица
    
    остается тока запрос написать eat(cat, X). и получить X = meat, X = i
     
  3. Thrillseeker

    Thrillseeker New Member

    Репутация:
    0
    Регистрация:
    21 апр 2013
    Сообщения:
    4
    Симпатии:
    0
    Большое Вам спасибо, всё работает!
     
  4. rrrFer

    rrrFer Гость

    Репутация:
    0
    да пжалсто, пишите еще )
     
  5. samuelson

    samuelson New Member

    Репутация:
    0
    Регистрация:
    23 май 2013
    Сообщения:
    1
    Симпатии:
    0
    Решить срочно 4 задачи на пролог, по цене договоримся, подробности: aleksandr.vozhakov@mail.ru
     
  6. rrrFer

    rrrFer Гость

    Репутация:
    0
    написал на почту
     
  7. Тань

    Тань New Member

    Репутация:
    0
    Регистрация:
    29 май 2013
    Сообщения:
    1
    Симпатии:
    0
    Помогите! Задание:
    Написать программу подсчёта суммы 8-битных знаковых чисел, расположенных в ячейках $8200 ... $82ff
     
  8. rrrFer

    rrrFer Гость

    Репутация:
    0
    на прологе ?
     
  9. developermen

    developermen New Member

    Репутация:
    0
    Регистрация:
    29 май 2013
    Сообщения:
    3
    Симпатии:
    0
    Видать что да !!! :o
     
Загрузка...

Поделиться этой страницей