Помогите решить простую задачу Turbo Prolog - Помощь студентам

zoomgel · 04.06.2014, 18:43

Здравствуйте, помогите пожалуйста.
Задача такая: Автобус Х проезжает остановку У. Какой маршрут автобуса Х?
Спасибо.

rrrFer · 04.06.2014, 22:29

Я так понимаю, есть сеть остановок, заданная в базе как-то так:

Код:

автобус(49, ['ветлужанка', 'строитель', 'площадь революции']).
автобус(47, ['студгородок', 'строитель', 'луч']).

Решается так:

Код:

маршрут(Маршрут, Остановка):-
  автобус(Маршрут, Остановки), member(Остановка, Остановки).

Я для SWI Prolog описал, для турбо... русский текст замените на латиницу и найдите в гугле правило member (оно стандартное).

zoomgel · 05.06.2014, 10:14

Спасибо большое!

rrrFer · 05.06.2014, 18:23

Да пжалсто, я вот видел, что кучу времени вы потратили на поиск ответа на соседнем форуме. Там нет пролог-программистов (нас там забанили всех за развитие пролог-коммьюнити вопреки бизнес-интересам администратора), но есть куча дятлов.

Вопрошайте тут.

04.06.2014, 18:43	#1
zoomgel Регистрация: 25.02.2011 Сообщений: 8	Помогите решить простую задачу Turbo Prolog Здравствуйте, помогите пожалуйста. Задача такая: Автобус Х проезжает остановку У. Какой маршрут автобуса Х? Спасибо.

04.06.2014, 22:29	#2
rrrFer Санитар Старожил Регистрация: 04.10.2008 Сообщений: 2,577	Я так понимаю, есть сеть остановок, заданная в базе как-то так: Код: `автобус(49, ['ветлужанка', 'строитель', 'площадь революции']). автобус(47, ['студгородок', 'строитель', 'луч']).` Решается так: Код: `маршрут(Маршрут, Остановка):- автобус(Маршрут, Остановки), member(Остановка, Остановки).` Я для SWI Prolog описал, для турбо... русский текст замените на латиницу и найдите в гугле правило member (оно стандартное). Мой блог о программировании и проектировании

05.06.2014, 18:23	#4
rrrFer Санитар Старожил Регистрация: 04.10.2008 Сообщений: 2,577	Да пжалсто, я вот видел, что кучу времени вы потратили на поиск ответа на соседнем форуме. Там нет пролог-программистов (нас там забанили всех за развитие пролог-коммьюнити вопреки бизнес-интересам администратора), но есть куча дятлов. Вопрошайте тут. Мой блог о программировании и проектировании Последний раз редактировалось rrrFer; 05.06.2014 в 19:05.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Помогите решить задачу на Turbo Pascal	tree	Паскаль, Turbo Pascal, PascalABC.NET	6	16.05.2010 23:27
Паскаль. Помогите решить простую задачу	Кириллович	Помощь студентам	2	22.05.2009 14:00
Помогите решить простую задачу	asercbr123	Microsoft Office Excel	4	11.12.2008 13:25
Помогите решить простую задачу	Teh	Общие вопросы Delphi	4	24.04.2008 07:37
Помогите решить простую задачу по C++	steal13	Общие вопросы C/C++	6	03.01.2008 09:40

05.06.2014, 10:14	#3
zoomgel Регистрация: 25.02.2011 Сообщений: 8	Спасибо большое!