написать SWI-Prolog 1.Составить запросы, протестировать факты и правила представленного первоначального варианта БЗ на прологе 2.Добавить одноместные и многоместные предикаты, характеризующие представленные семейства (непарнокопытные, хоботные, и т.д.)

Больше(слон,лошадь).
больше(лошадь, осел).
больше(осел,собака).
больше(осел,обезьяна).
больше(собака,кошка).
больше(кошка,мышь).
больше(Х,У):-больше(Х,Е),больше(Е,У).

непарнокопытные(лошадь).
непарнокопытные(осел).

семейство_псовые(собака).

приматы(обезьяна).

грызуны(мышь).

хоботные(слон).

вес(осел, 150).

имеет_копыта(осел).

непарнокопытные(Х):-млекопитающее(Х), имеет_копыта(Х), нечет_копыта(Х), вес(Х, Р), Р>149.

обитает(слон, азия).
обитает(слон, африка).

потребляет(слон, день, 300, кг, листья).
потребляет(слон, день, 300, кг, трава).

Darina1110    3   18.06.2020 19:13    2