Advertisement
Tomki

Untitled

Oct 5th, 2018
124
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Prolog 0.43 KB | None | 0 0
  1. возраст(слепаков, 23).
  2. возраст(мясников, 47).
  3. возраст(михалкова, 15).
  4. возраст(кряжнева, 22).
  5. возраст(сидоров, 13).
  6.  
  7. мужчина(слепаков).
  8. мужчина(мясников).
  9. мужчина(сидоров).
  10.  
  11. женщина(михалкова).
  12. женщина(кряжнева).
  13.  
  14. older_18(X, Y) :- мужчина(X), возраст(X, Z), Z > 18.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement