Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Prolog > Задачка пролог


Автор: Gulnazka 14.9.2009, 08:41
Мне нужно сделать похожую задачу, только на другую тему, на любую.Подскажите пожалуйста какую-нибудь тему,в голову ничего не лезет
domains 
    name=symbol
predicates
    men(name)
    women(name)
    married(name,name)
    son(name,name)
    daughter(name,name) 
    father(name,name)
    wife(name,name)
clauses
%определяем факты-свойства – кто является 
%мужчиной
men(sergey).men(petr).men(lev).men(dima).
men(kolya).men(fedya).men(borya).
%определяем факты-свойства – кто является
 %женщиной
women(tanya).women(anna).women(lena).women(masha).
women(eva).women(nadya).women(rita).
%определяем факты-отношения женатых пар
married(sergey,tanya).married(petr,anna).
married(lev,lena).married(dima,masha).married(kolya,eva).
%определяем факты-отношения сыновей
son(lev,tanya).son(fedya,masha).son(kolya,lena).
son(borya,masha).
%определяем факты-отношения дочерей
daughter(anna, tanya).daughter(masha, anna).
daughter(nadya, lena).daughter(rita, masha).
%выводим правило, по которому возможно определить %отношение отец-дочь или отец-сын
father(X,Y):-men(X),married(X,Z),son(Y,Z);men(X),married(X,Z),
daughter(Y,Z).
%выводим правило определения жен
wife(X,Y):-married(Y,X).
goal
write("\t\t\tFathers and сhildes"),nl,father(X,Y);
write("\t\t\tWifes"),nl,wife(X,_).

Автор: Gulnazka 14.9.2009, 18:06
Пипец тут офигенно крутые походу программеры собрались,никто не стал себя такой фигней утруждать,молодцы

Автор: P4oLka 14.9.2009, 21:34
Отношения любую сферу использовать, где какая-либо иерархия соблюдается. Например, могут быть заданы отношения студент-магистр-аспирант-доктор наук-академик. Ну а какие правила задавать- на твой вкус smile 

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)