模拟|【离散化扫描】校门外的树{加强版} 模拟|NOIP2011黎明前夕的黑暗

校门外的树某校大门外长度为L的马路上有一排树，每两棵相邻的树之间的间隔都是1米。我们可以把马路看成一个数轴，马路的一端在数轴0的位置，另一端在L的位置；数轴上的每个整数点，即0，1，2，……，L，都种有一棵树。
由于马路上有一些区域要用来建地铁。这些区域用它们在数轴上的起始点和终止点表示。已知任一区域的起始点和终止点的坐标都是整数，区域之间可能有重合的部分。现在要把这些区域中的树（包括区域端点处的两棵树）移走。你的任务是计算将这些树都移走后，马路上还有多少棵树。

输入格式
输入文件tree.in的第一行有两个整数L、M，L代表马路的长度，M代表区域的数目，L和M之间用一个空格隔开。接下来的M行每行包含两个不同的整数，用一个空格隔开，表示一个区域的起始点和终止点的坐标。
输出格式
输出文件tree.out包括一行，这一行只包含一个整数，表示马路上剩余的树的数目。

输入样例
500 3
150 300
100 200
470 471

输出样例
298
数据范围：
1 <= L <= 1000000， 1 <= M <= 10000
==============================
=====================

type node=record x,y:longint; end; var l,m:longint; a:array[1..10000]of node; procedure init; begin assign(input,'tree.in'); assign(output,'tree.out'); reset(input); rewrite(output); end; procedure terminate; begin close(input); close(output); halt; end; procedure qsort(s,t:longint); var i,j:longint; x,tem:node; begin i:=s; j:=t; x:=a[(s+t)shr 1]; repeat while (x.xa[j].y)) do dec(j); while (a[i].xx.y)) do inc(i); if i<=j then begin tem:=a[i]; a[i]:=a[j]; a[j]:=tem; inc(i); dec(j); end; until i>j; if ilast then begin tot:=tot+a[i].y-last; last:=a[i].y; end; end else begin tot:=tot+a[i].y-a[i].x+1; last:=a[i].y; end; end; writeln(l-tot); end; begin init; main; terminate; end.

【模拟|【离散化扫描】校门外的树{加强版}】