問題1.43

(define (repeated f n)
  (define (iter func count)
	(if (= count n)
		func
		(iter (compose func func) (+ count 1))))
  (iter f 1))