讨论 / 我不是搜的
cyc 2009-01-21 09:17:00
点我顶贴 收藏 删除
WAY:GREEDY

简朴的贪心算法 连数组都没用

最后一个点错了

错误输出117

标准输出116

郁闷中 谁解答一下?

program rqnoj227;

var

a,b,c,d,s,t:integer;

function min(q,w:integer):integer;

begin

if q>w then exit(W);

exit(q);

end;

begin

readln(a,b,c,d);

s:=min(c,b)+min(a,d);

t:=min(c,b);

dec(c,t);

dec(b,t);

t:=min(a,d);

dec(a,t);

dec(d,t);

t:=min(a div 2,c);

inc(s,t);

dec(a,2*t);

dec(c,t);

t:=min(a,b div 2);

inc(s,t);

dec(a,t);

dec(b,2*t);

t:=min(a div 2,b);

inc(s,t);

dec(a,t*2);

dec(b,t);

inc(s,a div 5);

writeln(s);

end.

#1 cyc@2008-07-29 15:59:00
回复 删除
我发错题目了

对不起

#2 小小小学生@2009-01-21 09:17:00
回复 删除
`````````````````
查看更多回复
提交回复