容易的网络游戏 vijos_1238（离散）

描述

现在网络游戏一款接一款地推出，佳佳和他的同学们也迷上了网络游戏。他们最近在玩N款不同的网络游戏。

一些网络游戏允许玩家购买双倍经验卡。拥有双倍经验卡的玩家可以在有效期内获得更多的经验值。佳佳和他的同学们有着丰富的网游经验，对于任何一款网络游戏，只要是在双倍经验的条件下，无论谁玩都可以在单位时间内轻松获得一个单位的经验值。

国庆节马上到了，网游公司不会错过这难得的机会大捞一把。中国网游常用的赚钱手段便是免费提供双倍经验（因为如果玩家再买一张双倍卡，便可获得4倍经验）。

在9、10、11月份，佳佳和他的同学们玩的N个网络游戏中每一个都会有一段开放免费双倍经验的时间。佳佳事先作了调查，他已经把每一款网游的双倍经验开放时间都记了下来。佳佳是不会乱用自己的零花钱购买双倍经验卡的，他决定在免费双倍经验时叫同学到家里一起玩；同时，他们也不会浪费自己的时间，为了提高效率，他们只玩处于免费双倍经验开放时期的游戏。

我们假定，每台电脑最多只能有一人操作，一个人最多只能操作一台电脑；并且每款游戏最多只能在一台电脑上玩，每台电脑最多运行一个游戏。我们忽略开始游戏和结束游戏时所消耗的时间。

现在佳佳想知道，假如佳佳共有M台电脑，且佳佳一共叫来了P个同学，那么他和他的同学们最多能得到多少单位的经验呢？

格式

输入格式

第一行有三个用空格隔开的整数N,M和P，它们表示的意义如题目描述。

以下N行，每行有两个用空格隔开的整数Xi,Yi(Xi<=Yi)，表示从Xi单位时间到Yi单位时间为第i款游戏开放双倍经验的时间。

对于70%数据，0<=Xi,Yi<=10000；
对于100%数据，0<=Xi,Yi<=5000000，0<=P<=2147483647，1<=N<=1000，1<=M<=1000。

输出格式

一个整数，表示佳佳和他的同学们能获得的最大经验值。

样例1

样例输入1

1 1 1
0 100

 
 

  
  

   
   Copy
  
  
 
 

样例输出1

101

 
 

  
  

   
   Copy
  
  
 
 

限制

各个测试点1s

var
 x,y:array[0..1001] of longint;
 i,j,k,l,n,m,head,tail,min:longint;
 key:boolean;
 ans:int64;
 c:array[0..3003] of longint;
 f:array[0..3001] of boolean;
function max(a,b:longint):longint;
 begin
  if a>b then exit(a);
  exit(b);
 end;

procedure qsort(l,r:longint);
 var
 i,j,key,t:longint;
 b:boolean;
begin
 i:=l;
 j:=r;
 key:=c[(l+r)div 2];
 repeat
  while c[i]<key do inc(i);
  while c[j]>key do dec(j);
  if i<=j then
   begin
    t:=c[i]; c[i]:=c[j]; c[j]:=t;
    b:=f[i]; f[i]:=f[j]; f[j]:=b;
    inc(i);
    dec(j);
   end;
 until i>j;
 if l<j then qsort(l,j);
 if i<r then qsort(i,r);
end;

procedure main;
 var
 i,j:longint;
 k:int64;
begin
 k:=0;
 for i:=1 to n*2 do
  begin
   if k<=min
    then ans:=ans+k*(c[i]-c[i-1])
    else ans:=ans+min*(c[i]-c[i-1]);
    if f[i] then dec(k)
            else inc(k);
  end;
end;

begin
 readln(n,m,k);
 if m<k+1 then min:=m
        else min:=k+1;
 for i:=1 to n do
  begin
  readln(x[i],y[i]);
  inc(y[i]);
  end;
 for i:=1 to n do
  begin
   c[i*2-1]:=x[i];
   c[i*2]:=y[i];
   f[i*2-1]:=false;
   f[i*2]:=true;
  end;
 qsort(1,n*2);
 {for i:=2 to n do
  begin
   if x[i]<=tail then
      tail:=max(tail,y[i])
     else begin
           ans:=ans+(tail-head+1);
           head:=x[i];
           tail:=y[i];
          end;
  end;
 ans:=ans+tail-head+1;}
 main;
 writeln(ans);
end.