begin
if sum>=b then begin
if min>sum-b then min:=sum-b; exit; end;
for i:=x+1 to n do dfs(i,sum+h[i]); end; begin
assign(input,'1.txt'); reset(input);
assign(output,'o.txt'); rewrite(output); readln(n,b); for i:=1 to n do readln(h[i]); min:=maxlongint; dfs(0,0); writeln(min); close(input); close(output); end.
输入 8 23 1 2 5 5 6 4 3 1 输出