Hopcroft-Karp:Finally
Ural 1109 AC 0.125s 11xxKB终于是AC了……在此仰视+感谢Maigo大牛……去OIBH,看见有Maigo的程序下载,随机测试,小数据没有问题……改大规模,发现竟然读数据RTE了……存边数的变量开成smallint了……汗…… 改了就AC了Maigo的程序只有6x行…… 我的现在有18x行……本地测试,感觉Maigo的程序还快一些……强悍……另:似乎Hopcroft-Karp实际上可能没有DFS的快…… 汗……
Ural 1109 AC 0.125s 11xxKB终于是AC了……在此仰视+感谢Maigo大牛……去OIBH,看见有Maigo的程序下载,随机测试,小数据没有问题……改大规模,发现竟然读数据RTE了……存边数的变量开成smallint了……汗…… 改了就AC了Maigo的程序只有6x行…… 我的现在有18x行……本地测试,感觉Maigo的程序还快一些……强悍……另:似乎Hopcroft-Karp实际上可能没有DFS的快…… 汗……
URAL 1109 WA 7UVA 670 ACSHTSC 2001 DOG ACUral 的数据就是强悍……
URAL 1109 WA 4UVA 670 PESHTSC 01 DOG Internal Error(AC)发现匈牙利树成环了………………晕死
和Hopcroft算法已经整整拼了两天了¡程序终于是写出来了,到现在SHTSC01那题-UVA670数据过了九成,算法还漏洞百出~不知道数据谁出的参考的书写的有问题~by mobile
终于AC了~~~修正了非常多的小BUG,使用随机测试非常多次,终于AC了~从最初的100行左右,涨到了22x行~~~新年新气象啊~下面是验证程序~ 不过不判无解的~const maxn=100; var c,t,p,q,n:longint; l,r:array[1..maxn,1..maxn]of longint; d:array[1..maxn]of longint; col:array[1..maxn,1..2]of byte; s:string; begin assign(input,’sgu121.in’);reset(input); readln(n); for t:=1 to n do begin read(p); while p<>0 do begin inc(d[t]); l[t,d[t]]:=p; read(p); end; end; close(input); p:=0; assign(input,’sgu121.out’);reset(input); readln(s); if s=’No solution’ then begin writeln(‘Reported No solution…’); exit; end; reset(input); for t:=1 to n do begin read(p);c:=0; while p<>0 …