(display
 (- 55 
    (apply + (map (^x (string->number x))
		  (string-split (read-line) " ")))))
(newline)