var
i,j,k,ii,n:longint;
a,b:array[1..1010] of longint;
begin
readln(n , k , ii);
for i:=1 to n do
a[i]:=i;
for i:=1 to k do
begin
for j:=1 to n do
if j mod 2 =1 then
b[j]:=a[(j+1) div 2]
else
b[j]:=a[n div 2+j div 2];
for j:=1 to n do
a[j]:=b[j];
end;
writeln(a[ii]);
end.
/**************************************************************
Problem: 1555
User: admin
Language: Pascal
Result: Wrong Answer
****************************************************************/