原题链接：https://www.luogu.com.cn/problem/P1156

P1156 垃圾陷阱

题目描述

卡门――农夫约翰极其珍视的一条Holsteins奶牛――已经落了到“垃圾井”中。“垃圾井”是农夫们扔垃圾的地方，它的深度为

卡门想把垃圾堆起来，等到堆得与井同样高时，她就能逃出井外了。另外，卡门可以通过吃一些垃圾来维持自己的生命。

每个垃圾都可以用来吃或堆放，并且堆放垃圾不用花费卡门的时间。

假设卡门预先知道了每个垃圾扔下的时间

输入格式

第一行为

第二到第

输出格式

如果卡门可以爬出陷阱，输出一个整表示最早什么时候可以爬出；否则输出卡门最长可以存活多长时间。

输入输出样例

输入 #1

输出 #1

说明/提示

[样例说明]

卡门堆放她收到的第一个垃圾：

卡门吃掉她收到的第

卡门堆放第

开一个结构体(记录)a[i].t,a[i].f,a[i].h分别代表第i个物体的投入时间，持续生命时间和高度。

设b[j]表示到达高度j时所拥有的最长的生命时间，注意b[0]=10。

那么转态转移应该是if(b[j]>b[j+a[i].h])b[j+a[i].h]=b[j];

如果有一个j+a[i].h>=d，那么就代表走出去了，

如果循环完了还没走出去就应该输出最长存活的时间。

下面是代码：

c/c++:

#include<stdio.h>
struct sj{
int t,f,h; 
}a[1001];
int b[1001];
int d,g;
void px(int k,int s){
    int i,j,mid;
    struct sj p;
    i=k;j=s;
    mid=a[(k+s)/2].t;
    do{
        while(a[i].t<mid)i++;
        while(a[j].t>mid)j--;
        if(i<=j){
            p=a[i];
            a[i]=a[j];
            a[j]=p;
            i++;j--;}
    }while(i<=j);
    if(i<s)px(i,s);
    if(k<j)px(k,j);
}
int main(){
    scanf("%d%d",&d,&g);
    for(int i=1;i<=g;i++)scanf("%d%d%d",&a[i].t,&a[i].f,&a[i].h);
    px(1,g);
    b[0]=10;
    for(int i=1;i<=g;i++)for(int j=d;j>=0;j--)
        if(b[j]>=a[i].t){
            if(j+a[i].h>=d){printf("%d",a[i].t);return 0;};
            if(b[j]>b[j+a[i].h])b[j+a[i].h]=b[j];
            b[j]+=a[i].f;
        }
    printf("%d",b[0]);
    return 0;
}

pascal:

type sj=record
    t:integer;
    f:integer;
    h:integer;
end;
var
    a:array[0..1000]of sj;
    b:array[0..1000]of integer;
    d:integer;
    g:integer;
procedure px(k,s:integer);
var
    i:integer;
    j:integer;
    mid:integer;
    p:sj;
begin
    i:=k;j:=s;
    mid:=a[(k+s) div 2 ].t;
    while i<=j do begin
        while a[i].t<mid do i:=i+1;
        while a[j].t>mid do j:=j-1;
        if i<=j then begin
            p:=a[i];
            a[i]:=a[j];
            a[j]:=p;
            i:=i+1;
            j:=j-1;
        end;
    end;
    if i<s then px(i,s);
    if k<j then px(k,j);
end;
var
    i:integer;
    j:integer;
begin
    readln(d,g);
    for i:=1 to g do readln(a[i].t,a[i].f,a[i].h);
    px(1,g);
    b[0]:=10;
    for i:=1 to g do for j:=d downto 0 do 
        if b[j]>=a[i].t then begin
            if j+a[i].h>=d then begin
                writeln(a[i].t);exit();
            end;
            if b[j]>b[j+a[i].h] then b[j+a[i].h]:=b[j];
            b[j]:=b[j]+a[i].f;
        end;
    writeln(b[0]);
end.

落谷P1156 垃圾陷阱