洛谷 1330 封锁阳光大学

题目描述
    曹是一只爱刷街的老曹，暑假期间，他每天都欢快地在阳光大学的校园里刷街。河蟹看到欢快的曹，感到不爽。河蟹决定封锁阳光大学，不让曹刷街。阳光大学的校园是一张由N个点构成的无向图，N个点之间由M条道路连接。每只河蟹可以对一个点进行封锁，当某个点被封锁后，与这个点相连的道路就被封锁了，曹就无法在与这些道路上刷街了。非常悲剧的一点是，河蟹是一种不和谐的生物，当两只河蟹封锁了相邻的两个点时，他们会发生冲突。
询问：最少需要多少只河蟹，可以封锁所有道路并且不发生冲突。

输入格式：
    第一行：两个整数N，M
    接下来M行：每行两个整数A，B，表示点A到点B之间有道路相连。

输出格式：

    仅一行：如果河蟹无法封锁所有道路，则输出“Impossible”，否则输出一个整数，表示最少需要多少只河蟹。
输入样例#1：
【输入样例1】
3 3
1 2
1 3
2 3

【输入样例2】
3 2
1 2
2 3

输出样例#1：
【输出样例1】
Impossible
【输出样例2】

1

解题思路：

    染色问题，注意图不一定联通。

代码：

var
  num,n,m,i,j,x,y,ans:longint;
  p,l,a,next:array[0..10000]of longint;
  e:array[0..200000,1..2]of longint;
  d:array[0..200000]of longint;
procedure add(x,y:longint);
begin
  inc(num);
  e[num,1]:=x;e[num,2]:=y;
  next[num]:=l[x];
  l[x]:=num;
end;


procedure bfs(h:longint);
var
  i,j,head,tail:longint;


begin
  fillchar(d,sizeof(d),0);
  head:=0;tail:=1;
  d[1]:=h;p[h]:=1;
  repeat
      inc(head);
      i:=d[head];
      if p[i]=1 then inc(x) else inc(y);
      i:=l[i];
      while i<>0 do
        begin
          if (p[e[i,2]]>0)and(p[e[i,2]]=p[e[i,1]])
            then begin
                   writeln('Impossible');
                   halt;
                 end;
          if(p[e[i,2]]=0) then
            begin
              if p[e[i,1]]=1 then p[e[i,2]]:=2
                else p[e[i,2]]:=1;
              inc(tail);
              d[tail]:=e[i,2];
            end;
          i:=next[i];
        end;
  until head>=tail;
end;


function min(x,y:longint):longint;
begin
  if x<y then exit(x)
    else exit(y);
end;


begin
  readln(n,m);
  for i:=1 to n do
    p[i]:=0;
  for i:=1 to m do
    begin
      readln(x,y);
      add(x,y);
      add(y,x);
    end;
  for i:=1 to n do
    if p[i]=0 then
    begin
      x:=0;y:=0;
      bfs(i);
      ans:=ans+min(x,y);
    end;
  writeln(ans);
end.