题解

27 条题解

  • 0
    @ 2014-10-06 08:55:50

    begin writeln(1);end.
    可得40分

  • 0
    @ 2010-03-13 15:39:52

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

    悲剧了两次70……大家千万不要像我一样理解错题意,误以为输出的是所用涂料中最大的……

  • 0
    @ 2009-11-04 16:44:10

    编译通过...

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

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

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

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

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

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 103ms

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

    Accepted 有效得分:100 有效耗时:103ms

    暴力... 只需floyed就够了..

  • 0
    @ 2009-08-27 14:58:06

    seekeof不要乱用~

  • 0
    @ 2009-08-19 19:33:45

    晕倒。。

    变量名打错。。。

    还有70分。。

  • 0
    @ 2009-08-19 17:27:21

    编译通过...

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

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

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

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

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

    ├ 测试数据 06:答案正确... 41ms

    ├ 测试数据 07:答案正确... 728ms

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

    Accepted 有效得分:100 有效耗时:769ms

    hxl orz

  • 0
    @ 2009-08-18 21:41:40

    切割矩阵+dfs=ms...

  • 0
    @ 2009-08-18 21:24:39

    oRZ

    一遍ac了……

  • 0
    @ 2009-08-18 17:13:31

    这个题的预处理太强大了!!! -_-|

  • 0
    @ 2009-08-18 17:10:08

    数据太弱……

    无需离散化,无需矩形切割,直接暴力

    考试的时候没看见“白色可以用”,郁闷……

  • 0
    @ 2009-08-18 17:08:18

    那个矩形太小了,直接暴力阿!

  • 0
    @ 2009-08-18 16:49:54

    var

    a,b,o,n,i,j,k,k1,k2:longint;

    x,y,x1,y1,cl:array[0..1000]of longint;

    g:array[0..101,0..101]of boolean;

    bb:array[0..1001,0..1001]of boolean;

    gg:array[0..1001,0..1001]of longint;

    bc:array[0..100]of boolean;

    kkk:boolean;

    l,c,p:array[0..1001]of longint;

    begin

    readln(a,b,n);

    for i:=1 to n do

    begin

    readln(x[i],y[i],x1[i],y1[i],cl[i]);

    bc[cl[i]]:=true;

    end;

    bc[1]:=true;

    k2:=0;

    while not eof do

    begin

    inc(k2);

    read(c[k2]);

    read(p[c[k2]]);

    g[c[k2],c[k2]]:=true;

    for i:=1 to p[c[k2]] do

    begin

    read(gg[c[k2],i]);

    g[c[k2],gg[c[k2],i]]:=true;

    end;

    end;

    fillchar(bb,sizeof(bb),false);

    g[1,1]:=true;

    k1:=0;

    for i:=n downto 1 do

    begin

    kkk:=false;

    for j:=x[i] to x1[i] do

    for o:=y[i] to y1[i] do

    if bb[j,o]=false then

    begin

    bb[j,o]:=true;

    if kkk=false then

    begin

    inc(k1);

    kkk:=true;

    l[k1]:=cl[i];

    end;

    end;

    end;

    for i:=1 to k2 do

    for j:=1 to p[c[i]] do

    for k:=1 to p[gg[c[i],j]] do

    if (bc[c[i]]) and (bc[gg[c[i],j]]) then

    if (g[c[i],gg[c[i],j]])and(g[gg,gg[gg,k]]) then

    g[c[i],gg[gg,k]]:=true;

    for i:=1 to k2 do

    begin

    kkk:=true;

    for j:=1 to k1 do

    if g[c[i],l[j]]=false then

    begin

    kkk:=false;

    break;

    end;

    if kkk=true then

    begin

    write(c[i]);

    halt;

    end;

    end;

    write('Escape');

    end.

    哈哈,没想到全过了,没超时.....

  • 0
    @ 2009-08-18 17:10:24

    哈哈

    哈哈

    哈哈

    预处理抄别人的,哈哈,终于A了!

  • 0
    @ 2009-08-18 15:30:09

    编译通过...

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

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

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

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

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

    ├ 测试数据 06:答案正确... 0ms

    ├ 测试数据 07:答案正确... 103ms

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

    Accepted 有效得分:100 有效耗时:103ms

    暴力的预处理加上暴力的floyed!!

  • 0
    @ 2009-08-18 13:56:39

    机器用过的颜色基德才能用,任意一种颜色都能覆盖自己

    如果没错的话,第三题的第三个数据违背了这句话。。。。

    如果是这样的话,算不算是数据有问题?

  • 0
    @ 2009-08-18 12:52:56

    水水的矩形切割+floyd~可惜比赛的时候没来得及交

  • 0
    @ 2009-08-18 12:02:37

    直接模拟填充+floyed。。。。

  • 0
    @ 2009-08-18 10:50:13

    第三个数据是什么啊

    好WS

  • 0
    @ 2009-08-18 09:23:44

    线段树+floyed......

    我想到传递闭包去了....

    总之改了N个错误,终于AC了...

  • 0
    @ 2009-08-18 08:25:52

    我有一个原创的预处理方法

    在整个预处理过程复杂度为O(N^2)级别

    时空和编程复杂度都别线段树好

信息

ID
1613
难度
7
分类
计算几何 | 图结构 点击显示
标签
递交数
894
已通过
168
通过率
19%
被复制
3
上传者