Var
 d,N,M,j,i,k:longnt;
 a:array [2..100000] of longint;
 f1,f2:text;
 begin
 assign (f1,holy.in);
 reset(f1);
 assign (f2,holy.out);
 rewrite (f2);
 begin
 read(b1,N,k);
 for i:=1 to n do
 begin
 if k=n then k+n;
 if m=n then k:n;
 end;;
 writeln (f2,k);
 close (f1);
 close (f2)
 end.