import Text.Printf (printf)

generateArray :: Integral a => a -> (a, a)
generateArray n
    | n <= 11 = (1, n - 1)
    | otherwise = (10, n - 10)

main :: IO ()
main = do
    n <- readLn :: IO Int
    let (a1, a2) = generateArray n
    printf "%d %d\n" a1 a2