const modulo=1048575;

var a:array[1..5] of longint;
    f,g:text;
    i,n,m:longint;

begin
 assign(f,'12perm.in'); reset(f);
 assign(g,'12perm.out'); rewrite(g);
 read(f,n);
 a[1]:=1; a[2]:=2; a[3]:=6; a[4]:=12;
 if n=1 then begin
  writeln(g,1);
  close(g); close(f);
  halt;
 end
 else begin
  a[1]:=a[2]; a[2]:=a[3]; a[3]:=a[4];
 end;
 m:=n-2;
 for i:=3 to m do begin
  a[4]:=(a[3]+a[1]+i shl 1) and 1048575;
  a[1]:=a[2]; a[2]:=a[3]; a[3]:=a[4];
 end;
 if n<=4 then
  writeln(g,a[n])
 else
  writeln(g,a[4]);
 close(f); close(g);
end.