n=-input()*2 while~n:n=n/2+n%2*5*n/2;print-n