88 条题解
-
0
lemon_yxa LV 8 @ 2009-08-30 21:50:36
数据巨弱。。。
for(i=2;i -
0
fengye61yi LV 8 @ 2009-08-29 20:04:50
额，水题
-
0
var i,j,k,n,m:integer;p,a,b:array[1..1000,1..1000] of integer;
procedure pr(x,y:integer);
var i,j,k:integer; begin
i:=p[x,y];if i=0 then begin write(y,' ');exit;end;pr(x,i);pr(i,y);end;begin readln(n);for i:=1 to n do for j:=1 to n do begin
read(a);if a=0 then a:=maxint;end;
i:=1;b:=a;for j:=1 to n do for k:=1 to n do
if b>b+b[k,j] then begin b:=b+b[k,j];p:=k;end;write('1 ');pr(1,n);writeln(b[1,n]);end.
最短解法！！！！！！过路不看，网络中断！！！！！！！经典至极！！！！！ -
0
lijian3256 LV 10 @ 2009-08-29 12:47:51
。。。SPFA比DIJST慢太正常不过了 N^2的边 SPFA已经退化到底了 。。。
-
0
朴素dijkstra。还是没能秒杀，呵呵
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 9ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 9ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 9ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：27ms -
0
为什么我SPFA都没秒杀?
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 56ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 41ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 25ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：122ms -
0
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：答案正确... 0ms
├ 测试数据 06：答案正确... 9ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Accepted 有效得分：100 有效耗时：9ms -
0
编译通过...
├ 测试数据 01：答案正确... 0ms
├ 测试数据 02：答案正确... 0ms
├ 测试数据 03：答案正确... 0ms
├ 测试数据 04：答案正确... 0ms
├ 测试数据 05：运行超时|格式错误...
├ 测试数据 06：答案正确... 0ms
├ 测试数据 07：答案正确... 0ms
├ 测试数据 08：答案正确... 0ms
├ 测试数据 09：答案正确... 0ms
├ 测试数据 10：答案正确... 0ms
---|---|---|---|---|---|---|---|-
Unaccepted 有效得分：85 有效耗时：0ms
program ma;
var
b,f:array[0..10000] of longint;
a:array[1..1000,1..1000] of longint;
min,mini,n,i,j:longint;
procedure sc(i:longint);
begin
if b[i]0 then
begin
sc(b[i]);
end;
if in then
write(i,' ')
else
write(i);
end;
begin
readln(n);
for i:=1 to n do
for j:=1 to n do
begin
read(a);
end;
for i:=1 to n do
f[i]:=maxlongint;
f[1]:=0;
for i:=2 to n do
begin
for j:=1 to n do
if (a[j,i]0)and(f[j]+a[j,i] -
0
第37个AC！
第48个提交！
第十三个发题解！
我的第91题！
如有疑问，查看我的题解：
http://user.qzone.qq.com/840684004/infocenter?ADUIN=840684004&ADSESSION=1251 -
0
SuperTyphoon LV 8 @ 2009-08-27 06:55:52
floyed超时严重……
楼下的DP不就是dijkstra思想吗
-
0
EZ_ray040123 LV 10 @ 2009-08-28 12:31:39
明摆的图论题，用dp？
难道是floyed?另外，由题目结合本人哇了多次的经验
OI总部处于另一个时空,有如下优美性质：
假设点A到B的距离可以不等于B到A的距离居然dijkstra比spfa快，哈
-
0
qyjubriskxp LV 10 @ 2009-08-27 00:00:51
全部写对，但是，输出反了，我的rp啊！！！！
lemon_yxa
LV 8
@ 2009-08-30 21:50:36
