URAL 1005 Stone pile_天涯浪子_新浪博客

最新推荐文章于 2018-01-29 22:13:54 发布

为美好世界献上珂学

最新推荐文章于 2018-01-29 22:13:54 发布

阅读量108

点赞数

文章标签：新浪 delphi 触发器 access algorithm

本文链接：https://blog.csdn.net/u012007227/article/details/109662811

版权

[报告]

这道题目真的好冷……

PS，一道非常经典的石子划分问题，用0/1背包，1次AC。（这是我的URAL史上第一次一次AC，祝贺一下）。

解释下：相当于有N种物品，每种物品的重量为W[I]，价值也为W[I]，放到容量∑(W[I])/2的背包里。按照0/1背包那样求出最大价值（设为V）后，输出∑(W[I])-2*V就可以AC了。

[程序]

// TASK: 1005 Stone pile
var
n,m,m2:longint;
w:array [0..20] of longint;
f:array [0..20*100000] of longint;
i,j,k:longint;
begin
read(n);
m:=0;
for i:=1 to n do
begin
    read(w[i]);
    inc(m,w[i]);
end;
m2:=m;
m:=m div 2;
fillchar(f,sizeof(f),0);
for i:=1 to n do
    for j:=m downto w[i] do
      if f[j-w[i]]+w[i]>f[j] then
        f[j]:=f[j-w[i]]+w[i];
writeln(m2-2*f[m]);
end.