Advertisement
Artashes

Task2.1

Jan 29th, 2019
123
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.51 KB | None | 0 0
  1. %1.2
  2. увлекается("Миша", гитара).
  3. увлекается("Маша", арфа).
  4. увлекается("Рома", футбол).
  5. увлекается("Таня", лыжи).
  6. спорт(футбол).
  7. спорт(лыжи).
  8. музыкальный_инструмент(арфа).
  9. музыкальный_инструмент(гитара).
  10.  
  11. музыкант(Кто):-увлекается(Кто, Чем), музыкальный_инструмент(Чем).
  12.  
  13. /* trace, музыкант(Кто) */
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement