线段覆盖

 线段覆盖 2
 时间限制: 1 s
 空间限制: 128000 KB
 题目等级 : 黄金 Gold

题目描述 Description
数轴上有n条线段，线段的两端都是整数坐标，坐标范围在0~1000000，每条线段有一个价值，请从n条线段中挑出若干条线段，使得这些线段两两不覆盖（端点可以重合）且线段价值之和最大。

输入描述 Input Description

</pre>第一行一个整数n，表示有多少条线段。接下来n行每行三个整数, ai bi ci，分别代表第i条线段的左端点ai，右端点bi（保证左端点<右端点）和价值ci。输出描述 Output Description输出能够获得的最大价值</div><div class="row b-b m-l-none m-r-none" style="border-bottom-width:1px; border-bottom-style:solid; border-bottom-color:rgb(222,229,231); margin-left:0px; margin-right:0px">样例输入 Sample Input31 2 12 3 21 3 4</div><div class="row b-b m-l-none m-r-none" style="border-bottom-width:1px; border-bottom-style:solid; border-bottom-color:rgb(222,229,231); margin-left:0px; margin-right:0px">样例输出 Sample Output4数据范围及提示 Data Size & Hint数据范围对于40%的数据，n≤10；对于100%的数据，n≤1000；0<=ai,bi<=10000000<=ci<=1000000</div><div class="row b-b m-l-none m-r-none" style="border-bottom-width:1px; border-bottom-style:solid; border-bottom-color:rgb(222,229,231); margin-left:0px; margin-right:0px"><pre code_snippet_id="665166" snippet_file_name="blog_20150512_2_8837853" name="code" class="plain">var i,n,j,k:longint;
    a:array[0..100] of longint;
    f:array[0..100,1..100] of longint;
    s:array[0..100] of longint;
    //定义f[i,j]表示从第i到第j堆间合并为一堆的最小代价。
function min(x,y:longint):longint;
begin
  if x>y then exit(x) else exit(y);
end;

begin
  readln(n);
  fillchar(f,sizeof(f),char(-1));
  for i:=1 to n do read(a[i]);
  for i:=1 to n do 
   for j:=1 to i do 
    s[i]:=s[i]+a[j];
  for i:=1 to n-1 do
   for j:=1 to n-i do 
    begin
     p:=i+j;
     f[j,p]:=maxlongint;
     for k:=1 to j-1 do
      begin 
       f[j,p]:=min:=(f[j,p],f[j,k]+f[k+1,p]);
       f[j,p]:=f[j,p]+s[p]-s[j-1];
      end;
    end;
end.