原来是赞同的连源,原来是反对的连汇,然后是朋友的就连在一起,这样最小割就是割掉违背和谐的吧 type arr=record toward,next,cap:longint; end; const maxm=; maxn=; var first,col,gap,d,cur:..maxn]of longint; edge:..maxm]of arr; esum,tot,s,t,n:longint; function min(x,y:longint):longint; begin if x<y the…