题目描述:现在,OI界出现了一位来无影去无踪的怪盗,那就是基德!曾经他盗窃了著名的Paris Sunshine,各位大牛为之震惊!所以,在这之后,许多大牛都废寝忘食,研究对付基德的有效办法,在这期间,为了防止基德再次来盗窃,OI总司令就决定派出OIER,来保护OI总部。现在你担任OI防御大队大队长,需要在OI总部里安排尽可能多的OI特制陷阱!原来OI总部是完全分离的两部分需要铺设特殊的管道才能到达OI总部。现在,OIER为了保卫总部,设计了许多许多的陷阱,让基德自投罗网。现在有一份超级无敌大牛提供的宝贵规划资料,需要让你来部署。你的任务就是编写一个程序来实现这次规划。
输入:输入文件中的第一行为两个整数x,y(10<=x<=600000000000010<=y<=1000000000000000),其中:x表示OI总部间隔带的长度,而y表示宽。第二行中为一个整数N(1<=N<=500000),表示分布在间隔带的陷阱对数。接下来的N行,每行有两个正数C,D(0<C,D<=x),描述了每一对陷阱沿着间隔带与西边境线的距离。其中:C表示北边间隔带陷阱的距离而D表示南边陷阱的距离。在间隔带的同一边,任何两个陷阱的位置都是不同的。
输出:输出文件中仅一行为一个整数,即在互不干扰的情况下所能布置的最多陷阱数目。
样例输入:
10 4
2
1 2
2 1
样例输出:
1
看到这道题,绝对会被X和Y的数据范围吓到,但我会告诉你,我直接用字符串读入,而且永不使用!!!
关于题目大意,其实我一开始也没看太懂,后来联想了一下普通的那种捕兽陷阱,(两端都有固定物,中间一条绳子)于是,我想到了一种方法:简称:左边快排,右边最长上升子序列。
代码:
var
a:array[0..500001,1..2]of longint;
f:array[0..500001]of longint;
n,i,j,k,x,y,z,s,ls:longint;
st:string;
procedure qs(l,r:longint);
var
i,j,x:longint;
y:array[1..2]of longint;
begin
i:=l;
j:=r;
x:=a[(l+r) div 2,1];
repeat
while a[i,1]<x do inc(i);
while x<a[j,1] do dec(j);
if not(i>j) then
begin
y:=a[i];
a[i]:=a[j];
a[j]:=y;
inc(i);
dec(j);
end;
until i>j;
if l<j then qs(l,j);
if i<r then qs(i,r);
end;
begin
assign(input,'save.in');
reset(input);
assign(output,'save.out');
rewrite(output);
readln(st);
readln(n);
for i:=1 to n do
readln(a[i,1],a[i,2]);
qs(1,n);
for i:=1 to n do
f[i]:=1;
s:=-maxlongint;
for i:=n-1 downto 1 do
begin
ls:=-maxlongint;
for j:=i+1 to n do
if (f[j]>ls)and(a[i,2]<=a[j,2]) then ls:=f[j];
if ls<>-maxlongint then inc(f[i],ls);
if f[i]>s then s:=f[i];
end;
writeln(s);
end.