Готовые ???????? ??????

Курсовая работа  АЛГОРИТМ НАХОЖДЕНИЯ СТЯГИВАЮЩЕГО ДЕРЕВА МЕТОДОМ ПОИСКА В ГЛУБИНУ

Содержание:

В наше насыщенное событиями время в любой области деятельности востребован человек, который равноценно владеет не только теорией, но и практикой, в то время как статистические исследования показали, что умение учащихся интегрировать знания и применять их для получения новых знаний и объяснения явлений, происходящих в окружающем мире получили достаточно низкую оценку специалистов. Изучение теории графов в немалой степени способствует разрешению этой проблемы благодаря своей специфике, а то, что этот предмет еще недостаточно изучен и представляет собой огромное поле для исследований и интересных открытий способно стимулировать интерес учащихся к познанию и самообучению, что так необходимо в нашем обществе.
Теория графов это один из разделов дискретной математики, изучающий свойства графов. Теория графов имеет огромное практическое значение, к примеру маршрутизация данных.
Тема исследования: Алгоритм нахождения стягивающего дерева методом поиска в глубину.
Объект исследования – ориенти¬рованные графы и деревья.
Предмет исследования – нахождение стягивающего дерева методом поиска в глубину.
Цель работы: Разработка программы на языке Turbo Pascal алгоритма нахождения стягивающего дерева методом поиска в глубину.

Для достижения этой цели были поставлены следующие задачи:
 обзор литературных данных по теме исследования дипломной работы;
 дать теоретическое обоснование алгоритма нахождения стягивающего дерева методом поиска в глубину;
 провести в ручную анализ графа и найти стягивающее дерево;
 составить программу для каждой задачи, реализующий алгоритм нахождения стягивающего дерева методом поиска в глубину;
 сравнить ручной анализ графа и результаты алгоритма нахождения стягивающего дерева методом поиска в глубину.

АЛГОРИТМ НАХОЖДЕНИЯ СТЯГИВАЮЩЕГО ДЕРЕВА МЕТОДОМ ПОИСКА В ГЛУБИНУ
Программа
PROGRAM O_s_t_o_v_G_r_a_p_h;
type Lref = ^Leader; { Tip: ukazatel' na zagolovochnyj uzel }
Tref = ^Trailer; { Tip: ukazatel' na dugovoj uzel }
{ Opisanie tipa zagolovochnogo uzla }
Leader=Record
Key : Integer; { Imja zagolovochnogo uzla }
Count: Integer; { Kolichestvo predshestvennikov }
Flag : Boolean; { Flag posewenija uzla pri obhode }
Trail: Tref; { Ukazatel' na spisok smezhnosti }
Next : Lref { Ukazatel' na sledujuwij uzel v }
{ spiske zagolovochnyh uzlov }
end;
{ Opisanie tipa dugovogo uzla }
Trailer = Record
Id : Lref;
Next: Tref
end;
var Head: Lref; { Ukazatel' na golovu spiska }
{ zagolovochnyh uzlov }
Tail: Lref; { Ukazatel' na fiktivnyj jelement }
{ v konce spiska zagolovochnyh uzlov }
t : Lref; { Rabochij ukazatel' dlja peremewenija }
{ po spisku zagolovochnyh zven'ev }
{ ---------------------------------------------------------- }
FUNCTION S_e_a_r_c_h_G_r_a_p_h (w: Integer; Head: Lref): Lref;
{ Funkcija vozvrawaet ukazatel' na zagolovochnyj uzel s kljuchom }
{ w v grafe, zadannom strukturoj Virta s ukazatelem Head }
var h: Lref;
BEGIN
h:=Head; Tail^.Key:=w;
While h^.Keyw do h:=h^.Next;
If h=Tail
{ V spiske zagolovochnyh uzlov net uzla s kljuchom w }
then begin
New (Tail); h^.Count:=0;
h^.Trail:=Nil; h^.Next:=Tail
end;
S_e_a_r_c_h_G_r_a_p_h:=h
END;
{ -------------------------------------------- }
..............................................................................................
.............................................................................................

К работе прилагается все исходники.
К работе прилагается рабочая программа на языке программирования.