(defun main (&rest argv) (declare (ignorable argv)) (let* ((n (read)) (m (floor n 2))) (format t "~d ~d~%" m (- n m)))) (main)