題意
oibh被突來的洪水淹沒了》.《還好oibh總部有在某些重要的地方起一些圍牆，用*號表示，而乙個封閉的*號區域洪水是進不去的……現在給出oibh的圍牆建設圖，問oibh總部沒被淹到的重要區域（由"0"表示）有多少。
分析做法，周圍一圈撒「種子」，然後將能蔓延的全部遍歷掉就行了
varzfc:ansistring;
i,j,x,y,tj:longint;
a:array[-1..501,-1..501]of char;
procedure s(i,j:longint);
varw:longint;
begin
if a[i,j]='0' then a[i,j]:='1' else exit;
s(i+1,j);
s(i-1,j);
s(i,j+1);
s(i,j-1);
end;
begin
while not eof(input) do
begin
read(zfc);
readln;
inc(i);
for j:=1 to length(zfc) do
a[i,j]:=zfc[j];
y:=length(zfc);
end;
x:=i;
for i:=1 to x do
begin
if a[i,1]='0' then s(i,1);
if a[i,y]='0' then s(i,y);
end;
for i:=1 to y do
begin
if a[1,i]='0' then s(1,i);
if a[x,i]='0' then s(x,i);
end;
for i:=1 to x do
for j:=1 to y do
if a[i,j]='0' then inc(tj);
writeln(tj);
end.
拯救oibh總部
題目背景 oibh總部突然被水淹沒了！現在需要你的救援 題目描述 oibh被突來的洪水淹沒了 還好oibh總部有在某些重要的地方起一些圍牆，用號表示，而乙個封閉的號區域洪水是進不去的 現在給出oibh的圍牆建設圖，問oibh總部沒被淹到的重要區域 由 0 表示 有多少。輸入格式 第一行是兩個數，x和...
DFS 拯救OIBH總部
拯救oibh總部 於 oibh被突來的洪水淹沒了 還好oibh總部有在某些重要的地方起一些圍牆，用 號表示，而乙個封閉的 號區域洪 水是進不去的 現在給出oibh的圍牆建設圖，問oibh總部沒被淹到的重要區域 由 0 表示 有多少。輸入第一行是兩個數，x和y x,y 500 第二行及以下是乙個由 和...
洛谷 P1506 拯救oibh總部
洛谷 p1506 拯救oibh總部 oibh總部突然被水淹沒了！現在需要你的救援 oibh被突來的洪水淹沒了 還好oibh總部有在某些重要的地方起一些圍牆，用 號表示，而乙個封閉的 號區域洪水是進不去的 現在給出oibh的圍牆建設圖，問oibh總部沒被淹到的重要區域 由 0 表示 有多少。輸入格式 ...