(defun main (&rest argv) (declare (ignorable argv)) (let* ((n (read)) (k (read))) (format t "~D~%" (if (< n k) 0 (expt 2 (- n k)))))) (main)