Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Задача на Паскале Графы / 4 сообщений из 4, страница 1 из 1
14.04.2012, 09:03
    #37753775
bleksenlen
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Задача на Паскале Графы
Пусть группа состоит из N человек. У одного из них есть книга, которую все хотели бы прочитать и потом обсудить с некоторыми из остальных. Написать программу, которая находит способ передачи книги таким образом, чтобы она побывала у каждого в точности один раз, переходят от друг друга и наконец возвр владельцу.
Помогите решить на пасале. Спасибо
...
Рейтинг: 0 / 0
14.04.2012, 13:28
    #37753895
Aleksandr Sharahov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Задача на Паскале Графы
bleksenlen,

Почему не подходит обычный цикл без графов?
...
Рейтинг: 0 / 0
15.04.2012, 20:40
    #37754730
Пётр Седов
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Задача на Паскале Графы
2 bleksenlen:
Раз уж речь идёт про графы, то скорее всего по условию задачи должно быть известно, какие пары людей могут встречаться (чтобы передать книгу). Если так, то надо построить гамильтонов цикл (содержит все вершины графа по одному разу). Эта задача -- NP-полная, то есть полиномиального алгоритма (работающего за время O(N const )) скорее всего не существует. Если хотите, могу накидать алгоритм, действующий тупым перебором. Вам как лучше -- на Free Pascal или на Delphi?
...
Рейтинг: 0 / 0
15.04.2012, 21:43
    #37754778
Hett
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Задача на Паскале Графы
Aleksandr Sharahovbleksenlen,

Почему не подходит обычный цикл без графов?
Потому, что препод по дискретке задал)
...
Рейтинг: 0 / 0
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Задача на Паскале Графы / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]