【2015.12NOIPtj模拟】团队背包(team)

【2015.12NOIPtj模拟】团队背包(team) 

题目：

DaA 和他的朋友组成一个团队去旅行了。他们每个人都准备了一个背包，用来装旅行用的物品。他们的背包有两个特点：
1. 每个人的背包能装无限多的物品，每种物品有一个价值，但只能装一件；
2. 每个人都很有个性，所以每个人的背包不会完全相同。
DaA 的团队中有M 个人，那么对于整个团队，背包价值和最大是多少呢？

输入：

第一行两个整数M、N，表示团队的人数和物品的数量。
接下来一行N 个整数，表示每件物品的价值wi。
数据保证不会出现有空背包人的出现。

输出：

一个整数，整个团队背包价值的最大值。

数据范围：

30%的数据 1<=M,N<=15。
60%的数据 1<=M<=200，1<=N<=100。
100%的数据 1<=M<=1,000,000，1<=N<=500，0<wi<=50。
输出请注意使用64 位整数（Pascal 中的Int64，C++中的long long）。

比赛时一直找规律，一直无解

后来就弃疗了

总觉得像DP，但想不出来

时间过去了...

还有八分钟

从厕所回来的我忽然灵光一闪，想到了一道例题

飞速码程序...

分数：100

一道DP题

用f[i]表示能组成重量i的不同方法的种数

那么DP方程：

f[i]:=f[i]+f[i-a[j]];

最后贪心加答案

标程：

var     m,n,i,j,k,l,s,tail,t1,len,p:longint;
        ans,x,sum,wi:int64;
        w:array[0..1000000]of longint;
        f:array[0..25000]of longint;
begin
        assign(input,'team.in');
        assign(output,'team.out');
        reset(input);
        rewrite(output);
        readln(m,n);
        for i:=1 to n do
                read(w[i]);
        f[0]:=1;
        for i:=1 to n do
        for j:=25000 downto w[i] do
        f[j]:=f[j]+f[j-w[i]];
        for i:=25000 downto 1 do
        begin
                ans:=ans+f[i]*i;
                m:=m-f[i];
                if m<=0 then
                begin
                        ans:=ans-abs(m)*i;
                        break;
                end;
        end;
        writeln(ans);
        close(input);
        close(output);
end.