 Кратчайший путь в графе |
ВНИМАНИЕ!
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
| SeregaR1Val |
  1.10.2008 9:26
Сообщение
#1
|
|
Новичок  Группа: Пользователи Сообщений: 37 Пол: Мужской Реальное имя: Серёга Репутация:  0   |
Помогите пожалуйста с программкой:
"Поиск кратчайшего пути в графе методом полного перебора в ширину с использованием АТД очередь" Сам алгоритм у меня есть, но ничего не знаю про АТД очередь, ни у кого нет примеров такой программы? |
   |
 
|
  |
Ответов
| volvo |
9.10.2008 18:31
Сообщение
#2
|
|
Гость |
Я ж написал тебе
Цитата // Label1 заполняется вот так: в предыдущем посте... Что там тебе не понравилось?Добавлено через 2 мин. P.S. И опять у тебя программа нерабочая, та же самая ошибка: queuepop вместо queuepush... Ты ответы что, не читаешь? Тогда зачем их пишут?  |
|
|
|
| SeregaR1Val |
9.10.2008 20:21
Сообщение
#3
|
|
Новичок Группа: Пользователи Сообщений: 37 Пол: Мужской Реальное имя: Серёга Репутация: 0 |
Цитата(volvo @ 9.10.2008 17:31)  И опять у тебя программа нерабочая, та же самая ошибка: queuepop вместо queuepush... Ты ответы что, не читаешь? Тогда зачем их пишут? Извини, я просто скопировал фрагмент из прошлого своего поста и забыл поменять quepop на queuepush, то, что ты написал я сделал, всё получилось ... вот с label1 что-то у меня вывод не правильно получается ... |
|
|
|
Сообщений в этой теме
SeregaR1Val Кратчайший путь в графе 1.10.2008 9:26
volvo Читай:
FAQ -> Очереди 1.10.2008 9:47
SeregaR1Val
Читай:
[url=http://forum.pascalnet.ru/index.php?s... 2.10.2008 17:36 volvo Что именно "поподробнее"? Ты ж сказал, ч... 2.10.2008 18:34 SeregaR1Val Спасибо большое, сейчас буду разбираться! 2.10.2008 19:23 SeregaR1Val Вроде всё понятно, немного модифицировал программу... 4.10.2008 13:24 volvo Потому что надо быть более внимательным:
procedure... 4.10.2008 19:32 SeregaR1Val procedure step;
begin
queueinit(q);
queuepush(q,... 9.10.2008 18:16 мисс_граффити
тебе же написали, как надо:
9.10.2008 22:14 SeregaR1Val Я бы просто так не писал, у меня все написано такж... 13.10.2008 17:56 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 23.06.2025 16:56 |