var ch:integer;
begin
read(ch);
while ch>0 do begin
     if (ch mod 2)=0 then begin 
                          ch:=ch div 2;
                          write(2);
                          end
                     else begin
                          ch:=-ch-1;
                          write(1);
                          end;
               end;
end.