洛谷 P1803 凌乱的yyy

题目描述

现在各大oj上有n个比赛，每个比赛的开始、结束的时间点是知道的。

yyy认为，参加越多的比赛，noip就能考的越好（假的）

所以，他想知道他最多能参加几个比赛。

由于yyy是蒟蒻，如果要参加一个比赛必须善始善终，而且不能同时参加2个及以上的比赛。

输入输出格式

输入格式：
第一行是一个整数n ，接下来n行每行是2个正整数ai,bi(ai< bi)，表示比赛开始、结束的时间。

输出格式：
一个整数最多参加的比赛数目。

输入输出样例

输入样例#1：
3
0 2
2 4
1 3
输出样例#1：
2
说明

对于20%的数据，n≤10；

对于50%的数据，n≤1000；

对于70%的数据，n≤100000；

对于100%的数据，n≤1000000，0≤ai＜bi≤1000000。

排序：
1.按照结束时间从小到大排序。
2.如果当前开始时间a[i]与选中的比赛的最晚结束时间j没有冲突则加入比赛数目，更新比赛最晚结束时间。
时间复杂度:O(n+n)

var
   a,b:array [0..1000000] of longint;
   i,j,n,ans:longint;

procedure qsort(l,r:longint);
var
   i,j,mid,top,t:longint;
begin
    if l>=r then exit;
    top:=a[(l+r) div 2];
    mid:=b[(l+r) div 2];
    i:=l; j:=r;
    repeat
        while (b[i]<mid) or ((b[i]=mid) and (a[i]<top)) do inc(i);
        while (b[j]>mid) or ((b[j]=mid) and (a[j]>top)) do dec(j);
        if i<=j then
           begin
               t:=a[i];a[i]:=a[j];a[j]:=t;
               t:=b[i];b[i]:=b[j];b[j]:=t;
               inc(i); dec(j);
           end;
    until i>j;
    qsort(i,r);
    qsort(l,j);
end;

begin
    readln(n);
    for i:=1 to n do readln(a[i],b[i]);
    qsort(1,n);
    j:=b[1];
    ans:=1;
       for i:=2 to n do
           if a[i]>=j
              then begin
                        inc(ans);
                        j:=b[i];
                   end;
    writeln(ans);
end.