本文主要是介绍(ssl1904)USACO 4.2 The Perfect Stall 完美的牛栏(最大匹配),希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
Description
农夫约翰上个星期刚刚建好了他的新牛棚,他使用了最新的挤奶技术。不幸的是,由于工程问题,每个牛栏都不一样。第一个星期,农夫约翰随便地让奶牛们进入牛栏,但是问题很快地显露出来:每头奶牛都只愿意在她们喜欢的那些牛栏中产奶。上个星期,农夫约翰刚刚收集到了奶牛们的爱好的信息(每头奶牛喜欢在哪些牛栏产奶)。一个牛栏只能容纳一头奶牛,当然,一头奶牛只能在一个牛栏中产奶。
给出奶牛们的爱好的信息,计算最大分配方案。
Input
第一行 两个整数,N (0 <= N <= 200) 和 M (0 <= M <= 200) 。N 是农夫约翰的奶牛数量,M 是新牛棚的牛栏数量。
第二行到第N+1行 一共 N 行,每行对应一只奶牛。第一个数字 (Si) 是这头奶牛愿意在其中产奶的牛栏的数目 (0 <= Si <= M) 。后面的 Si 个数表示这些牛栏的编号。牛栏的编号限定在区间 (1..M) 中,在同一行,一个牛栏不会被列出两次。
Output
只有一行。输出一个整数,表示最多能分配到的牛栏的数量。
Sample Input
5 5
2 2 5
3 2 3 4
2 1 5
3 1 2 5
1 2
Sample Output
4
Source
LJF
题解:本题依旧是最大匹配,而且和模板几乎一模一样请允许我刷访问量!(详见:这里)
vara:array[1..200,1..200]of boolean;l,s:array[1..200]of longint;v:array[1..200]of boolean;n,m,k,i,j,x,y,ans:longint;
function try(i:longint):boolean;
varj,t:longint;
begintry:=true;for j:=1 to m doif (a[i,j]) and not(v[j]) thenbegint:=l[j]; l[j]:=i; v[j]:=true;if (t=0) or try(t) then exit;l[j]:=t;end;try:=false;
end;
beginread(n,m);for i:=1 to n dobeginread(x);for j:=1 to x dobeginread(y);a[i,y]:=true;end;end;for i:=1 to m dobeginfillchar(v,sizeof(v),0);try(i);end;for i:=1 to m doif l[i]<>0 then inc(ans);write(ans);
end.
这篇关于(ssl1904)USACO 4.2 The Perfect Stall 完美的牛栏(最大匹配)的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!