#| BEGIN (Write your solution here) |#
(define (integrate-series a)
  (div-streams a integers))

(define cosine-series
  (cons-stream 1 (scale-stream (integrate-series sine-series) -1)))

(define sine-series
  (cons-stream 0 (integrate-series cosine-series)))
#| END |#