洛谷 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[..] of food;
     n,i,j,t:Longint;
     f:array[..] of int64;
 max:int64;
 begin
     read(t,n);
     for i:= to n do read(fd[i].a);
     for i:= to n do read(fd[i].b);
     for i:= to n do read(fd[i].c);
     for i:= to n- do
         for j:=I+ to n do  //千万别打错排序！！！
         if fd[i].b*fd[j].c<fd[j].b*fd[i].c then
         begin
             fd[]:=fd[i];
             fd[i]:=fd[j];
             fd[j]:=fd[];
         end;
     for i:= 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:= to t do if max<f[i] then max:=f[i];
     writeln(max);
 end.