标签：des style blog http io ar color 使用 sp
贝茜是一只非常努力工作的奶牛，她总是专注于提高自己的产量。为了产更多的奶，她预计好了接下来的N (1 ≤ N ≤ 1,000,000)个小时，标记为0..N-1。 Farmer John 计划好了 M (1 ≤ M ≤ 1,000) 个可以挤奶的时间段。每个时间段有一个开始时间(0 ≤ 开始时间 ≤ N), 和一个结束时间 (开始时间 < 结束时间 ≤ N), 和一个产量 (1 ≤ 产量 ≤ 1,000,000) 表示可以从贝茜挤奶的数量。Farmer John 从分别从开始时间挤奶，到结束时间为止。每次挤奶必须使用整个时间段。 但即使是贝茜也有她的产量限制。每次挤奶以后，她必须休息 R (1 ≤ R ≤ N) 个小时才能下次挤奶。给定Farmer John 计划的时间段，请你算出在 N 个小时内，最大的挤奶的量。
第1行三个整数N，M，R.接下来M行，每行三个整数Si，Ei，Pi．
最大产奶量．
注意：结束时间不挤奶
题解：好逗啊，弄来弄去原来是快排写错了TT，害得我WA了N次。。。别的嘛，按照开始时间排序后，然后DP之。。。
1 var 2 i,j,k,l,m,n,ans,r:longint; 3 a:array[0..2000,1..3] of longint; 4 f:array[0..2000] of longint; 5 procedure swap(var x,y:longint); 6 var z:longint; 7 begin 8 z:=x;x:=y;y:=z; 9 end; 10 function max(x,y:longint):longint; 11 begin 12 if x>y then max:=x else max:=y; 13 end; 14 procedure sort(l,r:longint); 15 var 16 i,j,x,y:longint; 17 begin 18 i:=l; 19 j:=r; 20 x:=a[(l+r) div 2,1]; 21 repeat 22 while a[i,1]<x do inc(i); 23 while a[j,1]>x do dec(j); 24 if i<=j then 25 begin 26 swap(a[i,1],a[j,1]); 27 swap(a[i,2],a[j,2]); 28 swap(a[i,3],a[j,3]); 29 inc(i);dec(j); 30 end; 31 until i>j; 32 if l<j then sort(l,j); 33 if i<r then sort(i,r); 34 end; 35 begin 36 readln(n,m,r); 37 for i:=1 to m do 38 begin 39 readln(a[i,1],a[i,2],a[i,3]); 40 a[i,2]:=a[i,2]+r; 41 end; 42 sort(1,m); 43 for i:=1 to m do 44 begin 45 f[i]:=a[i,3]; 46 for j:=1 to m-1 do 47 begin 48 if a[i,1]>=a[j,2] then 49 f[i]:=max(f[i],f[j]+a[i,3]); 50 end; 51 ans:=max(ans,f[i]); 52 end; 53 writeln(ans); 54 end.
1642: [Usaco2007 Nov]Milking Time 挤奶时间
标签：des style blog http io ar color 使用 sp
原文地址：http://www.cnblogs.com/HansBug/p/4163123.html
