題目描述
農民約翰有三個容量分别是A,B,C升的桶,A,B,C分别是三個從1到20的整數,最初,A和B桶都是空的,而C桶是裝滿牛奶的。有時,約翰把牛奶從一個桶倒到另一個桶中,直到被灌桶裝滿或原桶空了。當然每一次灌注都是完全的。由于節約,牛奶不會有丢失。
寫一個程式去幫助約翰找出當A桶是空的時候,C桶中牛奶所剩量的所有可能性。
PROGRAM NAME: milk3
INPUT FORMAT
單獨的一行包括三個整數A,B和C。
SAMPLE INPUT (file milk3.in)
8 9 10
OUTPUT FORMAT
隻有一行,列出當A桶是空的時候,C桶牛奶所剩量的所有可能性。
SAMPLE OUTPUT (file milk3.out)
1 2 8 9 10
SAMPLE INPUT (file milk3.in)
2 5 10
SAMPLE OUTPUT (file milk3.out)
5 6 7 8 9 10
var
bz:array[..,..]of boolean;
a,b,c,i,j:longint;
function min(x,y:longint):longint;
begin
if x>y then min:=y else min:=x;
end;
procedure search(ma,mc:longint);
var
mb:longint;
begin
if bz[ma,mc] then exit;
bz[ma,mc]:=true;
mb:=c-ma-mc;
search(ma-min(ma,b-mb),mc);
search(ma-min(ma,c-mc),mc+min(ma,c-mc));
search(ma+min(mb,a-ma),mc);
search(ma,mc+min(mb,c-mc));
search(ma+min(mc,a-ma),mc-min(mc,a-ma));
search(ma,mc-min(mc,b-mb));
end;
begin
readln(a,b,c);
fillchar(bz,sizeof(bz),false);
search(,c);
for i:= to c do
if bz[,i] then write(i,' ');
end.