Программирование на языке Пролог для искусственного интеллекта




Получение структурированной информации из базы данных - часть 3


               семья( _, X, _ ).

        ребенок( X) :-

                    % X - ребенок

               семья( _, _, Дети),

               принадлежит( X, Дети).

        принадлежит( X, [X | L ]).

        принадлежит( X, [Y | L ]) :-

               принадлежит( X, L).

        существует( Членсемьи) :-

                                   % Любой член семьи в базе данных

            муж( Членсемьи);

            жена( Членсемьи);

            ребенок( Членсемьи).

        дата рождения( Членсемьи( _, _, Дата, _ ), Дата).

        доход( Членсемьи( _, _, _, работает( _, S) ), S).

                                                                % Доход работающего

        доход( Членсемьи( _, _, _, неработает), 0).



Содержание  Назад  Вперед