; 入力された数を全て足し合わせて 55 から引いた数を出力する
(defun main (&rest argv)
  (declare (ignorable argv))
  (princ (- 55 (reduce #'+ (loop repeat 9 collect (read)))))
  (terpri))
(main)