题解

69 条题解

  • 0
    @ 2009-04-22 23:07:56

    武器八个方向,人只能四个方向

  • 0
    @ 2009-04-22 20:53:11

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

    BFS

    注意千万别把 两个人的坐标看反了!

  • 0
    @ 2009-04-16 15:00:29

    居然没看到 金钱镖是打一条直线上的。。。。。。。。。。。。

  • 0
    @ 2008-11-06 11:44:39

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

    ===================================\\

    宽搜就好了,之前要预处理下。。。

    具体见 http://user.qzone.qq.com/411824591/blog/1225943080

  • 0
    @ 2008-11-06 10:00:21

    70行胖子程序..

    没看到八个方向...- -|||

    敢情障碍物与还是有缝隙的

  • 0
    @ 2008-11-05 20:21:58

    我也写了100多行……

    数组[200,200]的可以通过,已经验证……

  • 0
    @ 2008-10-29 15:49:54

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

    怎么会写这么长,费了

    program P1263;

    var g:array[1..200, 1..200] of char;

    used:array[1..200, 1..200] of boolean;

    deep,za,zb,father:array[1..10000] of longint;

    startx,starty,endx,endy,i,j,n,m,p,q:longint;

    Function chuli(a, b: integer):boolean;

    Var

    i, x, y: integer;

    t: boolean;

    Begin

    chuli := false;

    t := false;

    For i:=b Downto 1 Do

    If g[a, i] 'X' Then Begin

    If (a = endx)and(i = endy) Then Begin

    t := true;

    break;

    End;

    End

    Else break;

    If t Then Begin

    chuli := true;

    exit;

    End;

    t := false;

    For i:=b To m Do

    If g[a, i] 'X' Then Begin

    If (a = endx)and(i = endy) Then Begin

    t := true;

    break;

    End;

    End

    Else break;

    If t Then Begin

    chuli := true;

    exit;

    End;

    t := false;

    For i:=a Downto 1 Do

    If g[i, b] 'X' Then Begin

    If (i = endx)and(b = endy) Then Begin

    t := true;

    break;

    End;

    End

    Else break;

    If t Then Begin

    chuli := true;

    exit;

    End;

    t := false;

    For i:=a To n Do

    If g[i, b] 'X' Then Begin

    If (i = endx)and(b = endy) Then Begin

    t := true;

    break;

    End;

    End

    Else break;

    If t Then Begin

    chuli := true;

    exit;

    End;

    t := false;

    x := a;

    y := b;

    While (x >= 1)and(y >= 1) Do Begin

    If g[x, y] = 'X' Then break;

    If (x = endx)and(y = endy) Then Begin

    t := true;

    break;

    End;

    dec(x);

    dec(y);

    End;

    If t Then Begin

    chuli := true;

    exit;

    End;

    t := false;

    x := a;

    y := b;

    While (x

  • 0
    @ 2008-10-12 10:05:14

    BFS+Hash...

  • 0
    @ 2008-09-29 10:23:56

    LABEL不准用 WA了一次

    判断越界时 把M+1打成M WA了一次

    然后AC

  • 0
    @ 2008-09-28 20:07:43

    荣幸得成为了这道题的第500位AC者,

    由于只知道n*m

  • 0
    @ 2008-09-18 23:01:10

    地图的坐标开多大?我开的是1..2000,1..2000的。一开始打算“心有多大,数组就有多大”,结果把vivid puppy弄得很郁闷。

    把能打到女飞贼的地方标记出来,再从林月如开始BFS。很简单的。

  • 0
    @ 2008-09-15 09:17:16

    深搜必定TLE

    宽搜=AC

    如果就10分左右的话不妨检查一下女飞贼的坐标和林月如的坐标有没有搞反(我就是这么检查了0.5h)

    还有注意,可能出现最开始就可以攻击的情况……

  • 0
    @ 2008-08-24 22:27:17

    看了各位的题解

    才发现居然是宽搜啊………………

    我压根儿就没想到这问题

    我……

    我是用那啥的

    用那个2维数组然后再一个一个加过来的

    居然还是exitcode=5……

  • 0
    @ 2008-08-14 08:54:38

    请问有那么难吗?

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

  • 0
    @ 2008-08-03 14:41:32

    帮我改一下,谢谢!

  • 0
    @ 2008-07-28 17:42:01

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

    好囧的打字题..烦死我了..

  • 0
    @ 2008-07-22 22:08:28

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

  • 0
    @ 2008-07-12 23:37:08

    靠,你们真强,我写了119行。。

    老老实实宽搜吧,全0ms。。。

    没事干想到goto语句好像很好玩,又看到题目描述,因此找到答案就这么写:

    cout

  • 0
    @ 2007-12-22 12:51:48

    打字题,95行程序,太颓废了.

    注意要用宽搜,深搜只能过5个点.

    如果你不嫌累,可以打记忆搜.

    提醒一句:这个矩形最多200*200 是不是很囧……

    宽搜的记录数组也别大了,200以内的。(前提是滚动)

    编译通过...

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

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

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

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

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

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

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

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

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

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

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

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

  • 0
    @ 2007-10-30 20:35:53

    看大牛们贴的程序,仿佛n,m

信息

ID
1263
难度
7
分类
搜索 点击显示
标签
递交数
1420
已通过
242
通过率
17%
被复制
4
上传者