Графи математика
При граф с тегла матрицата може д асъдържа теглото на съответната дъга, т.е. стойността на елемента с индекси v, w е теглото на дъгата от v към w. Ако няма дъга от v към w то съответния елемент на матрицата може да съдържа много голяма или много малка стойност в зависимост от задачата, която се решава.
Въвеждането на граф и създаване на матрица на съседство на ориентиран граф без тегла:
-
Program adjMatrix;
-
Const maxN=100;
-
Var a:array [1..maxN, 1..maxN] of Boolean;
-
j, v, w, n, e:integer;
-
begin
-
readln(n, e);
-
for v:=1 to n do
-
for w:=1 to n do a[v, w]:=false;
-
for j:=1 to E do
-
begin
-
readln(v, w);
-
a[v, w]:=true;
-
end;
-
end.
За неориентиран граф освен дъгата (v, w) трябва да се прибавя и обратната дъга (w, v). За целта ще добавим след ред 12:
a[w, v]:=true;
За графи, които не съдържат много дъги, е удобно представяне в списъци на съседства: За всеки възел да се създава списък от възлите, с които той е свързан.
Въвеждане на граф и създаване на списъци на съседство на ориентиран граф без тегла:
-
Program adjList;
-
Const maxN=100;
-
Type link=^node;
-
node=record v:integer; next:link end;
-
var j, v, w, e, n:integer;
-
t, z:link;
-
adj:array [1..maxN] of link;
-
begin
Други реферати:
Местна система за закрила на детето
Образование в бъдеще време
Модели на социалната патология
Социологически анализ
Различни типове модерни общества-либерален, комунистически, фашистки
Изтегли реферата