摘要：
var n,m,i,j,ans:longint; x,y,time,f:array[0..10010]of longint; begin readln(n,m); for i:=1 to m do readln(time[i],x[i],y[i]); ans:=1; for i:=1 to m do 阅读全文
摘要：
dp，但是要顺推容易点 const mm=12345678; var f:array[0..1,0..200,0..20,0..20]of longint; n,m,kk,now,sum,i,j,k1,k2:longint; function max(x,y:longint):longint; be 阅读全文
摘要：
//==========================蒟蒻Macaulish：http://www.cnblogs.com/Macaulish/转载要声明！//==========================判断二分图中某条路是否是唯一的。网络流做法要加个tarjan二分图就是再增广看能不能增... 阅读全文
摘要：
直接费用流，天数就是点数 type arr=record toward,next,cap,cost:longint; end;const maxm=200000; maxn=200; mm=1=0 do begin too:=edge[i].toward; value:=... 阅读全文
摘要：
推推公式，最后变成四个东西的前缀和然后不知道为什么一直wa，数据在本地测是没有错的&好心的管理员还给了某位p党大神a了的代码，感人肺腑（虽然还是没发现到底我的程序是问题）var f1,f2,f3,f4:array[0..2500,0..2500]of longint; x1,y1,x2,y2,n... 阅读全文
摘要：
太神了直接看了hzwer的题解，有个新认识，一条路径上满流的一定是这条路径上所有边的最小值。type arr=record toward,next,cap,from:longint; end;const maxm=200000; maxn=10000;var edge:array[0... 阅读全文
摘要：
明显拆点费用流； type arr=record toward,next,cap,cost:longint; end; const mm=1=0 do begin too:=edge[i].toward; value:=edge[i].cost; if (edge[i]... 阅读全文
摘要：
傻叉了一晚上，把t打成x，然后这题神奇在于输出一段数，不足的不用输出，一开始我的是直接找没有后面就退，然后这样会格式错误囧……然后最后zj的还卡了下空间，于是不用string就过了……string毁一生……const maxn=250550; mm=2000000;var hash,size,... 阅读全文
摘要：
简单的递推。const mm=10000; var i,j,n,m:longint; f:array[0..1005,0..1005]of longint; begin readln(n,m); f[1,0]:=1; for i:=2 to n do begin f[i,0]:=1... 阅读全文
摘要：
原来是赞同的连源，原来是反对的连汇，然后是朋友的就连在一起，这样最小割就是割掉违背和谐的吧type arr=record toward,next,cap:longint; end;const maxm=300000; maxn=700;var first,col,gap,d,cur:... 阅读全文
摘要：
dfs序，加个bit维护前缀和就行了type arr=record toward,next:longint; end;const maxn=500005;var edge:array[0..maxn]of arr; bit,numin,numout,first,deep:array[... 阅读全文
摘要：
注意说如果直接从每天的新的连向旧的，那整个图的最大流还是不变，答案就一直会是Σni*ftype arr=record toward,next,cap,cost:longint; end;const maxm=3000000; maxn=2200;var edge:array[0..m... 阅读全文
摘要：
和开发计划一样（数组开太小wa了好多次，然后为什么这么慢？type arr=record toward,next,cap,cost:longint; end;const maxm=200000; maxn=300;var edge:array[0..maxm]of arr; dis... 阅读全文
摘要：
题目的意思是要选一些数，但是这些数如果满足两个条件的话就不能一起被选。type arr=record toward,next,cap:longint; end; const maxn=4000; maxm=300000;var gap,first,cur,d,num1,num2:ar... 阅读全文
摘要：
这个星期切了几道题吧，虽然说还是想让自己搏一搏，但是毕竟自己弱嘛，而且很多东西都还没熟透&不像rausen大神都屠进前100了。加油吧。 阅读全文