Var
  P,N                                   : LongInt ;

Begin
  ReadLn (N) ;
  For P := N Downto 1 Do
    If ((2 * N - Sqr (P) + P) Mod (2 * P) = 0)
      And ((2 * N - Sqr (P) + P) > 0) Then
      Begin
        WriteLn ((2 * N - Sqr (P) + P) Div (2 * P), ' ', P) ;
        Break ;
      End ;
End .