負數出現確認。

單層可能確認。

完全模擬可能。

陰人的 = =

注意結果開Longint...

输入层的ci 不用减 ui `\

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

题目出得太隐晦

看懂后，宽搜AC之

题目描述害人。

Ci>0才处理，输出。

BFS也可做

fuck 了 输出要求CI>0 早知道先看题解了。。。

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

const maxn=201;

var ti,i,k,t,n,p,a,b:longint;

f:boolean;

c,u,x,y,id,od:array[0..maxn]of longint;

check:array[0..maxn]of boolean;

w:array[0..maxn,0..maxn]of longint;

begin

assign(input,'network.in');

reset(input);

assign(output,'network.out');

rewrite(output);

readln(n,p);

for i:=1 to n do

begin

read(c[i],u[i]);

end;

fillchar(id,sizeof(id),0);

fillchar(od,sizeof(od),0);

filldword(w,sizeof(w) shr 2,maxlongint);

for i:=1 to p do

begin

read(a,b);

read(w[a,b]);

inc(od[a]);

inc(id);

end;

fillchar(check,sizeof(check),true);

for i:=1 to n do

begin

if id[i]=0 then check[i]:=false;

end;

ti:=0;

while true do

begin

f:=true;

for i:=1 to n do if id[i]=0 then begin k:=i;f:=false;break;end;

if f then break;

if check[i] then c[k]:=c[k]-u[k];

id[k]:=-1;

if (od[k]=0) and (c[k]0) then

begin

inc(ti);

x[ti]:=k;

y[ti]:=c[k];

end;

if c[k]>0 then

begin

for i:=1 to n do

if (w[k,i]0) then

begin

c[i]:=c[i]+w[k,i]*c[k];

dec(id[i]);

end;

end;

end;

if ti=0 then writeln('NULL')

else for i:=1 to ti do writeln(x[i],' ',y[i]);

close(input);

close(output);

end.

哪有错？

竟然数据会有负值，害我交3次60分

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

其实真的不用TOPO。

用D=0表示这个点尚未传到；

用D=1表示这个点正要处理；

用D=2表示这个点已经搞定；

水，竟然没看到输出null时不用加编号.....不然早1次ac

最后一组数据特殊情况

1 0

2 10

。。。骗过了。。。汗。。。。。。

为什么都说是拓扑排序呢?其实不用任何算法，模拟就可以过呀！

队列，模拟，之后就是

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

MMD 这样的题好做不好读，差点又把脑壳读昏了。。。

做了2年的老水题。。。。

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：0ms

算法：topo排序。

题目的描述存在缺陷，题目要求输出非0点，但输出时只可以输出大于0的点，否则第2个点错误。

数据非常弱...............

但是注意一点：边权可以是0.

这个题目告诉我，要认真看题，下面这个语句，找了N半天才发现错了...

if sj[t].c

首先，使用TOP排序，直接往后累加

最好使用邻接表。

另外，题目中所指的非0其实是大于0

我彻彻底底地成神经病了,看个题目看了快1个小时才开始写.

还不如直接写图论问题......

这样还必要容易明白

搞的我一开始还以为是直接带公式呢.

我再一次地、强烈地提醒一下：输出的c[i]是要大于零的！！

P.S.为此我交了三遍才过……