【普及组模拟赛】作业

题目描述

光光上了高中，科目增多了。在长假里，光光的老师们都非常严厉，都给他布置了一定量的作业。假期里，光光一共有的时间是 k 小时。在长假前，老师们一共给光光布置了 n份作业，第 i 份作业需要的时间是 ti 小时。但是由于老师们互相不商量，因此光光有可能不能完成老师的作业。当可能不能完成老师的作业时，光光就事后去向老师说明，然后被老师批评一顿了事。对于一件作业，只有 2 种情况：完成或者不完成（快要完成也算不完成）。
如果没完成，受到批评是天经地义的。但是，不同的作业对于光光来说，批评的力度是不同的。第 i 件作业如果没完成，就要受到 pi 个单位的批评。多次这样之后，光光想要在长假前就知道他至少会受到多少个单位的批评。你能帮助他吗？

输入

输入文件的第一行只有一个数字 k。
第二行只有一个数字 n。
接下来 n 行，每行两个数字，分别是 ti 和 pi，两个数字之间用一个空格分开。

输出

输出文件 homework.out 仅包含一行，是一个数字，代表了光光最少受到的批评。

样例输入

5
3
2 6
1 3
4 7

样例输出

6

数据范围限制

【数据范围】
100%的数据中， k<=100000， ti<=10000， pi<=10000；
30%的数据中， n<=20；
100%的数据中， n<=500。

分析
这题其实就是一个0/1背包
先就总和，再求最大可以减少的批评，最后输出它们的差。

程序：

uses
math;
var
k,n,i,j:longint;
tj:int64;
f:array[0..100000]of int64;
w,v:array[0..600]of longint;
begin
    assign(input,'homework.in');
    reset(input);
    assign(output,'homework.out');
    rewrite(output);
    readln(k);
    readln(n);
    tj:=0;
    for i:=1 to n do
    begin
        readln(w[i],v[i]);
        tj:=tj+v[i];
    end;
    for i:=1 to n do
    for j:=k downto w[i] do
    f[j]:=max(f[j],f[j-w[i]]+v[i]);
    write(tj-f[k]);
    close(input);
    close(output);
end.