传送门
按照时间排序
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.