Recursive Approach

since

bx × by

=

bx+y

(define power
  (lambda (b e)
    (if (= e 0)
        1
        (* b (power b (- e 1))))))