; 掛け算をして比較する (defun main () (let* ((n (read)) (p (read))) (princ (if (= (* n p) p) "=" "!=")) (terpri))) (main)