2016.11.1第二题 音量调节 codevs 2278

题目描述 Description
一个吉他手准备参加一场演出。他不喜欢在演出时始终使用同一个音量，所以他决定每一首歌之前他都要改变一次音量。在演出开始之前，他已经做好了一个列表，里面写着在每首歌开始之前他想要改变的音量是多少。每一次改变音量，他可以选择调高也可以调低。

音量用一个整数描述。输入文件中给定整数beginLevel，代表吉他刚开始的音量，以及整数maxLevel，代表吉他的最大音量。音量不能小于0也不能大于maxLevel。输入文件中还给定了n个整数c1,c2,…,cn，表示在第i首歌开始之前吉他手想要改变的音量是多少。

吉他手想以最大的音量演奏最后一首歌，你的任务是找到这个最大音量是多少。

输入描述 Input Description
第一行依次为三个整数：n, beginLevel, maxlevel。

第二行依次为n个整数：c1,c2,…,cn。

输出描述 Output Description
输出演奏最后一首歌的最大音量。如果吉他手无法避免音量低于0或者高于maxLevel，输出-1。

样例输入 Sample Input
Sample 1
3 5 10
5 3 7

Sample 2
4 8 20
15 2 9 10

样例输出 Sample Output
Sample 1
10

Sample 2
-1

数据范围及提示 Data Size & Hint
1 ≤ n ≤ 50，1 ≤ ci ≤ maxLevel ≤ 1000，0 ≤ beginLevel ≤ maxLevel

分析：
判定性dp。用f[i,j]表示前i个数的音量可不可以调到j。设第i个数为a[i],
f[i,j]=(f[i-1,j-a[i]] or f[i-1,j+a[i]]);

代码：

const
 maxn=5001;
var
 f:array [0..maxn,-1..maxn] of boolean;
 a:array [1..maxn] of longint;
 i,j,n,maxe,q:longint;
begin
 readln(n,q,maxe);
 for i:=1 to n do
  read(a[i]);
 f[0,q]:=true;
 for i:=1 to n do
   for j:=0 to maxe do
    begin
     if f[i-1,j] then
      begin
       if j-a[i]>=0 then f[i,j-a[i]]:=true;
       if j+a[i]<=maxe then f[i,j+a[i]]:=true;
      end;
    end;
 f[n,-1]:=true;
 for i:=maxe downto -1 do
   if f[n,i] then
    begin
     writeln(i);
     exit;
    end;
end.