火烧赤壁
描述
曹操平定北方以后,公元208年,率领大军南下,进攻刘表。他的人马还没有到荆州,刘表已经病死。他的儿子刘琮听到曹军声势浩大,吓破了胆,先派人求降了。
孙权任命周瑜为都督,拨给他三万水军,叫他同刘备协力抵抗曹操。
隆冬的十一月,天气突然回暖,刮起了东南风。
没想到东吴船队离开北岸大约二里距离,前面十条大船突然同时起火。火借风势,风助火威。十条火船,好比十条火龙一样,闯进曹军水寨。那里的船舰,都挤在一起,又躲不开,很快地都烧起来。一眨眼工夫,已经烧成一片火海。
曹操气急败坏的把你找来,要你钻入火海把连环线上着火的船只的长度统计出来!
格式
输入格式
第一行:N
以后N行,每行两个数:Ai Bi(表示连环线上着火船只的起始位置和终点,-10^9<=Ai,Bi<=10^9)
输出格式
输出着火船只的总长度
样例1
样例输入1
3
-1 1
5 11
2 9
Copy
样例输出1
11
Copy
提示
n<=20000
如果Ai=Bi是一个点则看作没有长度
来源
huyichen
思路:思考难度其实不大的,就是找到所有的集合然后统计元素的个数啦!!!!!
var
a,b:array[0..20000]of longint;
i,j,k,n,ans:longint;
procedure kui(x,y:longint);
var
i,j,m,t:longint;
begin
i:=x;j:=y;
m:=a[(i+j)div 2];
repeat
while a[i]<m do inc(i);
while a[j]>m 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;
if i<y then kui(i,y);
if x<j then kui(x,j);
end;
begin
read(n);
for i:=1 to n do read(a[i],b[i]);
kui(1,n);
b[0]:=-maxlongint;
for i:=1 to n do
begin
if a[i]<b[i-1] then a[i]:=b[i-1];
if a[i]>b[i] then b[i]:=a[i];
end;
for i:=1 to n do ans:=ans+b[i]-a[i];
write(ans);
end.