(define (sum n) (if (= n 1) 1 (+ (sum (- n 1))))) (sum (read))