bzoj1207: [HNOI2004]打鼹鼠

传送门
按照时间排序
f[i]表示打死第i只鼹鼠是最多打死几只鼹鼠。
暴力转移M^2不虚。
然后就过了。

var
  a,b,c,f:array [0..10005] of longint;
  n,i,j,ans,m:longint;
begin
  read(m,n);
  for i:=1 to n do read(a[i],b[i],c[i]);
  for i:=1 to n do f[i]:=1;
  for i:=2 to n do
    for j:=1 to i-1 do
      if (a[i]-a[j]>=abs(b[i]-b[j])+abs(c[i]-c[j])) and (f[j]+1>f[i]) then f[i]:=f[j]+1;
  ans:=0;
  for i:=1 to n do if (f[i]>ans) then ans:=f[i];
  write(ans);
end.