Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.09;
Скачать: CL | DM;

Вниз

Prolog   Найти похожие ветки 

 
kop   (2006-03-17 23:35) [0]

Привет всем! я понимаю, что это форму по Delphi, но форума по Прологу я не знаю к сожалению. Моежт вы знаете, как разрешить мою проблему. Итак, есть задача: показать все родителей.
clauses
    man(igor).
    man(petr).
    woman(nastya).
    woman(olga).
    parent(olga,nastya).
    parent(petr,nastya).
    parent(petr,olga).
    father(X):-parent(X,_), man(X).
goal
    father(Who).

На выходе результат будет - petr, petr. А как сделать так, чтобы отца (в данном случае petr) пролг вывел только один раз?
Подскажите пожалуйста, если знаете. спасибо.


 
Кашперук Иван   (2006-03-18 03:23) [1]

Настройками это сделать у меня, помню, не получилось

решал доп. условиями на father()

Не помню как просто уже, сорри


 
fester ©   (2006-03-18 10:24) [2]

Здесь хороший форум по прологу
http://www.progz.ru/forum/index.php
...мне помогали :-)


 
SydNey ©   (2006-03-18 22:45) [3]


> clauses
>     man(igor).
>     man(petr).
>     woman(nastya).
>     woman(olga).
>     parent(olga,nastya).
>     parent(petr,nastya).
>     parent(petr,olga).
>     father(X):-parent(X,_), man(X),!.
> goal
>     father(Who).


 
SydNey ©   (2006-03-18 22:46) [4]


>     father(X):-parent(X,_), man(X),!.



Страницы: 1 вся ветка

Текущий архив: 2006.04.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.029 c
2-1143487831
EHOT
2006-03-27 23:30
2006.04.09
Ждущий режим


3-1139978243
Strech
2006-02-15 07:37
2006.04.09
значение полей по умолчанию


2-1143307171
Китаец
2006-03-25 20:19
2006.04.09
Компонент WebBrowser


2-1143473111
SamProf
2006-03-27 19:25
2006.04.09
Как можно перечислить все диски?


1-1141670794
Начинающий__
2006-03-06 21:46
2006.04.09
Form.BorderStyle = bsSizeable, не показывать иконку