(defun main () (let ((a (read)) (b (read))) ; 片方がもう片方の2倍以上ならば、"No"を出力. そうでなければ"Yes"を出力. (if (<= (* 2 a) b) (format t "~a~%" "No") (format t "~a~%" "Yes")))) (main)