VPF::Поиск пути в графе - Форум программистов

katushkaaa

Дата 17.12.2010, 09:30 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 17.12.2010

Репутация: нет
Всего: нет

Помогите,кто может,пожалуйста,с написанием задачи(И как ее проверять)!Очень нужно до завтра сдать,а то мне будет хана!!В прологе разбераюсь мягко говоря не очень, надеюсь на помощь умных людей.Спасибо заранее!!!
Задача такая:
Поиск пути в графе,проходящий через все вершины.

dorogoyIV

Дата 17.12.2010, 10:42 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1503
Регистрация: 26.3.2007

Репутация: нет
Всего: 46

так пойдет?

Код


domains
    i = integer
    i_tree = tree(i_tree, i, i_tree); void
predicates
    print_tree(i_tree)
clauses
    print_tree(void):- !.
    print_tree(tree(L, V, R)):- print_tree(L), write(V," "), print_tree(R).
goal
    print_tree(tree(tree(tree(void, 8, void), 1, void), 2,
                 tree(void, 3, tree(void, 7, void)))).

Здесь дерево. Это похоже

Это сообщение отредактировал(а) dorogoyIV - 17.12.2010, 10:44

katushkaaa

Дата 17.12.2010, 14:40 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 17.12.2010

Репутация: нет
Всего: нет

Спасибо!А как проверять не подскажите?

dorogoyIV

Дата 17.12.2010, 14:48 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1503
Регистрация: 26.3.2007

Репутация: нет
Всего: 46

ну а что там проверять?
в блоке goal видно цифры - 8 1 2 3 7
запустишь программу - то же самое.

ps: если заменить

Код


    print_tree(tree(L, V, R)):- print_tree(R), write(V," "), print_tree(L).

будет в обратную сторону smile

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Prolog \| Следующая тема »