#| BEGIN (Введите свое решение) |#
(define (double f)
  (lambda (x) (f (f x))))
#| END |#