洛谷 P1417 烹调方案

题目背景

由于你的帮助，火星只遭受了最小的损失。但gw懒得重建家园了，就造了一艘飞船飞向遥远的earth星。不过飞船飞到一半，gw发现了一个很严重的问题：肚子饿了~ gw还是会做饭的，于是拿出了储藏的食物准备填饱肚子。gw希望能在T时间内做出最美味的食物，但是这些食物美味程度的计算方式比较奇葩，于是绝望的gw只好求助于你了。

题目描述

一共有n件食材，每件食材有三个属性，ai，bi和ci，如果在t时刻完成第i样食材则得到ai-t*bi的美味指数，用第i件食材做饭要花去ci的时间。
众所周知，gw的厨艺不怎么样，所以他需要你设计烹调方案使得美味指数最大

输入输出格式

输入格式：

第一行是两个正整数T和n，表示到达地球所需时间和食材个数。
下面一行n个整数，ai
下面一行n个整数，bi
下面一行n个整数，ci

输出格式：

输出最大美味指数

输入输出样例

输入样例#1：

74 1
502
2
47

输出样例#1：

408

说明

【数据范围】
对于40%的数据1<=n<=10
对于100%的数据1<=n<=50
所有数字均小于100,000
【题目来源】
tinylic改编

解题思路

这是一个刷屏AC的题目（满满的都是泪）

这个题跟国王游戏的贪心方式有一些类似

可以考虑 有两个菜的三值分别为a1,b1,c1,a2,b2,c2

则 两种情况为a1-(t+c1)*b1+a2-(t+c1+c2)*b2  （1）

　　　　　　 a2-(t+c2)*b2+a1-(t+c1+c2)*b1  （2）

如果（1）>（2）则c1*b2<c2*b1 按照这个条件排序之后跑一边01背包就ok啦（排序打错的孩子飘过）

program cook;  
type food=record  
    a,b,c:int64;  
    end;  
var fd:Array[0..100001] of food;  
    n,i,j,t:Longint;  
    f:array[0..100001] of int64;  
max:int64;  
begin  
    read(t,n);  
    for i:=1 to n do read(fd[i].a);  
    for i:=1 to n do read(fd[i].b);  
    for i:=1 to n do read(fd[i].c);  
    for i:=1 to n-1 do  
        for j:=I+1 to n do  //千万别打错排序！！！
        if fd[i].b*fd[j].c<fd[j].b*fd[i].c then  
        begin  
            fd[0]:=fd[i];  
            fd[i]:=fd[j];  
            fd[j]:=fd[0];  
        end;  
    for i:=1 to n do  
        for j:=t downto fd[i].c do  
        if f[j-fd[i].c]+fd[i].a-j*fd[i].b>f[j] then f[j]:=f[j-fd[i].c]+fd[i].a-j*fd[i].b;   
    for i:=1 to t do if max<f[i] then max:=f[i];  
    writeln(max);  
end.