#| BEGIN (Write your solution here) |#
(define (make-accumulator sum)
  (define (accumulator n)
    (begin (set! sum (+ sum n))
           sum))
  accumulator)
#| END |#