題意

判斷一個圖是否為一個邊通圖

分析

這題我用深搜來做

var
n,x,y,tj:longint;
a:array[0..101,0..101]of longint;
f:array[0..101]of longint;


procedure dfs(i:longint);
var
j:longint;
begin
? ? for j:=1 to n do
? ? if (f[j]=0)and(a[i,j]=1) then
? ? begin
? ? ? ? f[j]:=1;
? ? ? ? inc(tj);
? ? ? ? dfs(j);
? ? end;
end;


begin
? ? readln(n);
? ? fillchar(a,sizeof(a),0);
? ? fillchar(f,sizeof(f),0);
? ? while not eoln do
? ? begin
? ? ? ? readln(x,y);
? ? ? ? a[x,y]:=1;
? ? ? ? a[y,x]:=1;
? ? end;
? ? tj:=0;
? ? dfs(1);
? ? if tj=n then write(1) else write(0);
end.

轉載于:https://www.cnblogs.com/YYC-0304/p/9500155.html

與50位技術專家面對面20年技術見證，附贈技術全景圖

總結

以上是生活随笔為你收集整理的连通图(深搜)的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。