хранения порядка
хранения порядка просмотра вершин графа, Nnew - массив признаков: вершина просмотрена или нет*}
var j,v:integer;
begin
v:=St[k-1]; {*номер последней вершины*}
for j:=1 to N do if (A[v,j]<>0) then {*есть ребро между
вершинами с номерами v и j*}
if (k=N+1) and (j=1) then <вывод цикла>
else if Nnew[j] then {*вершина не просмотрена*}
begin St[k]:=j;Nnew[j]:=false;
Gm(k+1);Nnew[j]:=true;end;
end;
Фрагмент основной логики.
......
St[1]:=1;Nnew[1]:=false; Gm(2]);
......
3.5.3. Фундаментальное множество циклов
Каркас (V,T) связного неориентированного графа G=<V,E> содержит N-1 ребро, где N - количество вершин G. Каждое ребро, не принадлежащее T, то есть любое ребро из E-T, порождает в точности один цикл при добавлении его к T. Такой цикл является элементом фундаментального множества циклов графа G относительно каркаса T. Поскольку каркас состоит из N-1 ребра, в фундаментальном множестве циклов графа
Индекс
Элементарные функции
Линейные уравнения
Нелинейные уравнения
Случайные числа