var     n,i,j:longint;
        f,g:text;

begin
  assign(f,'nummst.in');
  assign(g,'nummst.out');
  reset(f);
  rewrite(g);
  readln(f,n);
  i:=2;
  while n mod i <>0 do inc(i);
  write(g,n div i,' ',n-(n div i));
  close(g);
end.