С Новым годом! Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.62/13: Рейтинг темы: голосов - 13, средняя оценка - 4.62
0 / 0 / 0
Регистрация: 04.01.2019
Сообщений: 13

Поиск в глубину. DFC (для списка смежности)

05.01.2019, 16:34. Показов 2566. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Напишите пожалуйста код на паскале - Поиск в глубину используя списки смежности (да,да не матрица смежности) и также с метками.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
05.01.2019, 16:34
Ответы с готовыми решениями:

Из списка смежности в матрицу смежности. Выполнить обход графа глубину
Помогите пожалуйста с программой: Дан список смежности. Преобразовать в матрицу смежности. Выполнить обход графа в глубину. Заранее...

Матрица смежности графа - поиск в глубину
Здравствуйте дорогие форумчане. У меня тут небольшая ошибка. Никак не могу понять что к чему. Объясните пожалуйста. #include...

Преобразование списка смежности в матрицу смежности
Помогите пожалуйста, нужно разработать алгоритм преобразования списка смежности в матрицу смежности, для неорентированного графа. И все...

4
445 / 373 / 133
Регистрация: 09.09.2011
Сообщений: 1,343
06.01.2019, 18:55
очень мало усилий с твоей стороны.

если ты не понимаешь как реализовать алгоритм, то остальную часть ты можешь хотя бы сформулировать.

нужны исходные данные для списков, тесты.

и что значит "с метками"?
0
0 / 0 / 0
Регистрация: 04.01.2019
Сообщений: 13
06.01.2019, 19:23  [ТС]
Не я прекрасно понимаю как реализовать поиск в глубину для матрицы смежности но не для списков смежности ( списков ребер). НО после усердного поиска я понял что вероятней всего мою задачу (Проверка является ли точка a предком b для 100000 ребер) возможно решить только с помощью динамических массивов которых в паскале к сожалению нет((.
Метки (задача)
Расстановка меток вершин графа при поиске в глубину (используя массивы d и f) на С++ он выглядит примерно так
C++
1
2
3
4
5
6
7
8
9
10
void dfs(int v)
{
  int i;
  used[v] = 1;
  d[v] = time++;
  for (i = 1; i <= n; i++)
    if (m[v][i] && !used[i]) dfs(i);
  used[v] = 2;
  f[v] = time++;
}
0
445 / 373 / 133
Регистрация: 09.09.2011
Сообщений: 1,343
06.01.2019, 19:59
в другой теме ответил.

кроме того, в паскале есть динамические массивы - это часть языка, в отличии от того же C и C++ - где это библиотечные функции.

и кроме того во всех паскалях есть механизмы доступа к динамической памяти - соответственно можно реализовать любые динамические структуры на куче.
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,158
Записей в блоге: 1
09.01.2019, 10:23
Цитата Сообщение от ivandr2004 Посмотреть сообщение
динамических массивов которых в паскале к сожалению нет((
Это утверждение ложно.

Добавлено через 33 минуты
Приведенный фрагмент кода расстановки меток вершин вполне может выглядеть так:
Pascal
1
2
3
4
5
6
7
8
9
10
procedure dfs(v: Integer);
var i: Integer;
begin
  used[v]:=1;
  d[v]:=time; Inc(time);
  for i:=1 to n do
    if (m[v][i]<>0) and (used[i]=0) then dfs(i);
  used[v]:=2;
  f[v]:=time; Inc(time);
end;
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
09.01.2019, 10:23
Помогаю со студенческими работами здесь

Разработать программы поиска в глубину и поиска в ширину при описании графа с помощью матрицы смежности
Ребят помогите, на носу экзамен. Дали задачу,для получения зачета. Весь мозг себе сломал, не как не знаю как её сделать. Прошу вашей...

Для графа дерева найти длину пути от вершины U до V (использовать поиск в глубину и счётчик глубины рекурсии WG)
помоги, пожалуйста, нужна программа:wall: Для графа дерева найти длину пути от вершины U до V (использовать поиск в глубину и счётчик...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути
Programma_Boinc 01.01.2026
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru