Description
一个吉他手准备参加一场演出。他不喜欢在演出时始终使用同一个音量，所以他决定每一首歌之前他都要改变一次音量。在演出开始之前，他已经做好了一个列表，里面写着在每首歌开始之前他想要改变的音量是多少。每一次改变音量，他可以选择调高也可以调低。
音量用一个整数描述。输入文件中给定整数beginLevel，代表吉他刚开始的音量，以及整数maxLevel，代表吉他的最大音量。音量不能小于0也不能大于maxLevel。输入文件中还给定了n个整数c1,c2,c3…..cn，表示在第i首歌开始之前吉他手想要改变的音量是多少。
吉他手想以最大的音量演奏最后一首歌，你的任务是找到这个最大音量是多少。
Input
第一行依次为三个整数：n, beginLevel, maxlevel。
第二行依次为n个整数：c1,c2,c3…..cn。
Output
输出演奏最后一首歌的最大音量。如果吉他手无法避免音量低于0或者高于maxLevel，输出-1。
Sample Input
3 5 10
5 3 7
5 3 7
Sample Output
10
HINT
1<=N<=50,1<=Ci<=Maxlevel 1<=maxlevel<=1000
0<=beginlevel<=maxlevel
题解：
题目给出了许多个限制，问最大可行音量都是多少。
可以把每种音量是否可以取压缩为60个二进制状态，通过and运算来进行限制。
最后枚举最大答案。
代码：
const
ww=( shl )-;
var
i,j,k,l,ll,n,nn,m,max:longint;
a,b:array[..]of qword;
begin
readln(n,l,m); nn:=m div ; max:=( shl((m mod )+))-;
if(l<)or(l>m)then begin writeln(-); halt; end;
i:=l div ; j:=l mod ;
a[i]:=a[i]or( shl j);
for i:= to n do
begin
read(l);
for j:= to nn do b[j]:=;
for j:= to nn do
begin
ll:=l; k:=j;
while(ll>)and(k>=)do
begin
ll:=ll-; dec(k);
end;
if k>= then
begin
b[k]:=b[k]or(a[j] shr ll);
dec(k); ll:=-ll;
if k>= then
b[k]:=(b[k]or(a[j] shl ll))and ww;
end;
ll:=l; k:=j;
while(ll>)and(k<=nn)do
begin
ll:=ll-; inc(k);
end;
if k<=nn then
begin
b[k]:=b[k]or(a[j] shl ll);
if k=nn then b[k]:=b[k]and max else b[k]:=b[k]and ww;
inc(k); ll:=-ll;
if k<=nn then
begin
b[k]:=b[k]or(a[j] shr ll);
if k=nn then b[k]:=b[k]and max
else b[k]:=b[k]and ww;
end;
end;
end;
a:=b;
end;
for i:=nn downto do
begin
if a[i]> then
begin
k:=;
while a[i]> do
begin inc(k); a[i]:=a[i]shr ; end;
k:=k-;
writeln(i*+k); halt;
end;
end;
writeln(-);
end.