[USACO] Score Inflation

【题目描述】

学生在我们USACO的竞赛中的得分越多我们越高兴。

我们试着设计我们的竞赛以便人们能尽可能的多得分,这需要你的帮助。

我们可以从几个种类中选取竞赛的题目,这里的一个"种类"是指一个竞赛题目的集合,解决集合中的题目需要相同多的时间并且能得到相同的分数。你的任务是写一个程序来告诉USACO的职员,应该从每一个种类中选取多少题目,使得解决题目的总耗时在竞赛规定的时间里并且总分最大。输入包括竞赛的时间,M(1 <= M <= 10,000)(不要担心,你要到了训练营中才会有长时间的比赛)和N,"种类"的数目1 <= N <= 10,000。后面的每一行将包括两个整数来描述一个"种类":

第一个整数说明解决这种题目能得的分数(1 <= points <= 10000),第二整数说明解决这种题目所需的时间(1 <= minutes <= 10000)。你的程序应该确定我们应该从每个"种类"中选多少道题目使得能在竞赛的时间中得到最大的分数。

来自任意的"种类"的题目数目可能是任何非负数(0或更多)。

计算可能得到的最大分数。

【解题报告】

时间卡的很坑爹,完全背包。

 1 {
2 ID: wwzhwdw1
3 PROG: inflate
4 LANG: PASCAL
5 }
6
7 program inflate;
8 var
9 j,n,m,i:longint;
10 f,a,t:array[0..10001]of longint;
11
12 procedure init;
13 begin
14 assign(input,'inflate.in');
15 reset(input);
16 assign(output,'inflate.out');
17 rewrite(output);
18 end;
19
20 procedure outit;
21 begin
22 close(input);
23 close(output);
24 end;
25
26 procedure main;
27 begin
28 readln(m,n);
29 for i:=1 to n do read(a[i],t[i]);
30 f[0]:=0;
31 for j:=1 to n do
32 for i:=t[j] to m do
33 begin
34 if f[i]<f[i-t[j]]+a[j] then f[i]:=f[i-t[j]]+a[j];
35 end;
36 writeln(f[m]);
37 end;
38
39 begin
40 init;
41 main;
42 outit;
43 end.
44

转载于:https://www.cnblogs.com/wwzhwdwd/archive/2011/08/27/2155573.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值