【DP】饥饿的牛

 饥饿的牛

源程序名　　　HUNGER.??? (PAS,C,CPP)

可执行文件名   HUNGER.EXE

输入文件名　　 HUNGER.IN

输出文件名     HUNGER.OUT 

牛在饲料槽前排好了队。饲料槽依次用1到N(1<=N<=2000)编号。每天晚上，一头幸运的牛根据约翰的规则，吃其中一些槽里的饲料。

    约翰提供B个区间的清单。一个区间是一对整数start-end,1<=start<=end<=N，表示一些连续的饲料槽，比如1-3,7-8,3-4等等。牛可以任意选择区间，但是牛选择的区间不能有重叠。

当然，牛希望自己能够吃得越多越好。给出一些区间，帮助这只牛找一些区间，使它能吃到最多的东西。

在上面的例子中，1-3和3-4是重叠的；聪明的牛选择{1-3，7-8}，这样可以吃到5个槽里的东西。 

输入

第一行，整数B(1<=B<=1000)

第2到B+1行，每行两个整数，表示一个区间，较小的端点在前面。 

输出

仅一个整数，表示最多能吃到多少个槽里的食物。 

样例

HUNGER.IN

3

1 3

7 8

3 4 

HUNGER.OUT

5

=================================

=====================================

type  node=record         s,e:longint;       end;var  b:longint;  a:array[1..2000]of node;  f:array[0..2000]of longint;procedure init;begin  assign(input,'hunger.in');  assign(output,'hunger.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:node;  tem:node;begin  i:=s; j:=t;  x:=a[(s+t)shr 1];  repeat    while x.e<a[j].e do dec(j);    while a[i].e<x.e 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 i<t then qsort(i,t);  if s<j then qsort(s,j);end;function max(a,b:longint):longint;begin  if a>b then exit(a);  exit(b);end;procedure main;var  i,j:longint;  ans:longint;begin  readln(b);  for i:=1 to b do    readln(a[i].s,a[i].e);  qsort(1,b);  fillchar(f,sizeof(f),0);  ans:=0;  for i:=1 to b do    for j:=a[i].s-1 downto 0 do    begin      f[a[i].e]:=max(f[a[i].e],f[j]+(a[i].e-a[i].s+1));      if ans<f[a[i].e] then ans:=f[a[i].e];    end;  writeln(ans);end;begin  init;  main;  terminate;end.