Бет любит тоже что и Мери, если это фрукт.
- like(bet,Apples).
- like(bet,X):-like(mary,X)
- like(bet,Y):-like(mary,Y);fruit(Y)
- like(bet,x):-like(mary,x);fruit(x).
- like(bet,X):-like(mary,X),fruit(X)..
К сожалению, у нас пока нет статистики ответов на данный вопрос,
но мы работаем над этим.