program druk_iter;
var w, k : longint;
function ack(m,n : longint) : longint;
begin
(*   writeln(m:10,',',n:10); *)
   if m=0 then ack:=n+1
   else if n=0 then ack:=ack(m-1,1)
   else  ack:=ack(m-1,ack(m,n-1))
end;
begin
   write('Liczba1 : '); read(k); write(' Liczba2 : '); readln(w);
   writeln('ackermann(',k:2,',',w:2,')=',ack(k,w):10)
end.