# фиксации признака,

фиксации признака, просмотрена вершина графа или нет, требуется структура данных типа: Nnew : array[1..N] of boolean. Пример. Пусть граф описан матрицей смежности A. Поиск начинается с первой вершины. На левом рисунке приведен исходный граф, а на правом рисунке у вершин в скобках указана та очередность, в которой вершины графа просматривались в процессе поиска в глубину. Логика. procedure Pg(v:integer);{Массивы Nnew и A глобальные} var j:integer; begin Nnew[v]:=false; write(v:3); for j:=1 to N do if (A[v,j]&lt;&gt;0) and Nnew[j] then Pg(j); end; Фрагмент основной логики. ... FillChar(Nnew,SizeOf(Nnew),true); for i:=1 to N do if Nnew[i] then Pg(i); ... В силу важности данного алгоритма рассмотрим его нерекурсивную реализацию. Глобальные структуры данных прежние: A - матрица смежностей; Nnew - массив признаков. Номера просмотренных вершин графа запоминаются в стеке St, указатель стека - переменная yk. procedure PG1(v:integer); var St:array[1..N] of integer;yk:integer;t,j:integer;pp:boolean; begin

Индекс
Элементарные функции Линейные уравнения Нелинейные уравнения Случайные числа