JZOJ 4.2 C组 打鼹鼠

题目描述

鼹鼠是一种很喜欢挖洞的动物，但每过一定的时间，它还是喜欢把头探出到地面上来透透气的。

根据这个特点阿Q编写了一个打鼹鼠的游戏：在一个n*n的网格中，在某些时刻鼹鼠会在某一个网格探出头来透透气。你可以控制一个机器人来打鼹鼠，如果i时刻鼹鼠在某个网格中出现，而机器人也处于同一网格的话，那么这个鼹鼠就会被机器人打死。而机器人每一时刻只能够移动一格或停留在原地不动。机器人的移动是指从当前所处的网格移向相邻的网格，即从坐标为（i,j）的网格移向(i-1, j),(i+1, j),(i,j-1),(i,j+1)四个网格，机器人不能走出整个n*n的网格。游戏开始时，你可以自由选定机器人的初始位置。

现在你知道在一段时间内，鼹鼠出现的时间和地点，希望你编写一个程序使机器人在这一段时间内打死尽可能多的鼹鼠。

输入

文件第一行为n（n<=1000）, m（m<=10000），其中m表示在这一段时间内出现的鼹鼠的个数，接下来的m行每行有三个数据time,x,y表示有一只鼹鼠在游戏开始后time个时刻，在第x行第y个网格里出现了一只鼹鼠。Time按递增的顺序给出。注意同一时刻可能出现多只鼹鼠，但同一时刻同一地点只可能出现一只鼹鼠。

输出

输出文件mole.OUT中仅包含一个正整数，表示被打死鼹鼠的最大数目。

样例输入

2 2
1 1 1
2 2 2

样例输出

1

---

纪中的时间比较短，所以用以前的程序过不了，要加优化（以前的blog：http://blog.csdn.net/ssl_zzy/article/details/59559602）
其实优化很简单：每次将a[i].f降序排序，如果每枚举到一个大于max就直接退出。

---

代码如下：

type
  node=record
  f,t,x,y:longint;
end;

var max,i,j,n,m:longint;
    t:node;
    a:array[0..10000]of node;
begin
  assign(input,'mole.in');
  assign(output,'mole.out');
  reset(input);
  rewrite(output);
  readln(n,m);
  for i:=1 to m do readln(a[i].t,a[i].x,a[i].y);
  for i:=1 to m do
    begin
      max:=0;
      for j:=i-1 downto 1 do
        if a[j].f>=max then
          begin
            if(abs(a[i].x-a[j].x)+abs(a[i].y-a[j].y)<=a[i].t-a[j].t)then max:=a[j].f;
          end
        else break;
      a[i].f:=max+1;
      j:=i;
      while a[j].f<a[j-1].f do begin t:=a[j];a[j]:=a[j-1];a[j-1]:=t;dec(j);end;
    end;
  write(a[m].f);
  close(input);
  close(output);
end.