написать SWI-Prolog 1.Составить запросы, протестировать факты и правила представленного первоначального варианта БЗ на прологе 2.Добавить одноместные и многоместные предикаты, характеризующие представленные семейства (непарнокопытные, хоботные, и т.д.)
Больше(слон,лошадь).
больше(лошадь, осел).
больше(осел,собака).
больше(осел,обезьяна).
больше(собака,кошка).
больше(кошка,мышь).
больше(Х,У):-больше(Х,Е),больше(Е,У).
непарнокопытные(лошадь).
непарнокопытные(осел).
семейство_псовые(собака).
приматы(обезьяна).
грызуны(мышь).
хоботные(слон).
вес(осел, 150).
имеет_копыта(осел).
непарнокопытные(Х):-млекопитающее(Х), имеет_копыта(Х), нечет_копыта(Х), вес(Х, Р), Р>149.
обитает(слон, азия).
обитает(слон, африка).
потребляет(слон, день, 300, кг, листья).
потребляет(слон, день, 300, кг, трава).
