var a,b,n :word;
label   konec, sem, tam;
    
begin
while not eof do
begin
 readln(a,b,n);
 if n=a then begin writeln('fill A');goto konec; end;
 if n=b then begin writeln('fill B');goto konec; end;
 if (n=(2*b-2*a)) then begin writeln ('fill B');writeln('pour B A');
    writeln('empty A');writeln('pour B A');writeln('fill B');
    writeln('pour B A');goto konec; end;
 if n=(((b div a)+1)*a-b) then begin writeln ('fill A');writeln('pour A B');
    writeln ('fill A');writeln('pour A B');goto konec; end;
if (n mod a = 0) and ((b-n)mod a = 0) then if (((b-n) div a)>(n div a)) then goto sem else goto tam;
if (n mod a = 0) then
  begin 
  sem:
  b:=0;
  repeat 
    writeln('fill A');writeln('pour A B');
    b:=b+a;
  until b=n;
  goto konec;
  end;

if ((b-n)mod a = 0) then
 begin
   tam:
   writeln('fill B');
   repeat
    writeln('pour B A');
    b:=b-a;
    writeln('empty A');
   until b=n;
   goto konec;  
 end;  

konec:	  
 writeln('success');writeln; 
end;

end.