(defun power(B E)
(if (= E 1)
B
(* B ( power B (- E 1)))))
(setq base (read))
(setq exponent (read))
(print (power base exponent))
KGRlZnVuIHBvd2VyKEIgRSkKKGlmICg9IEUgMSkKQgooKiBCICggcG93ZXIgQiAoLSBFIDEpKSkpKQooc2V0cSBiYXNlIChyZWFkKSkKKHNldHEgZXhwb25lbnQgKHJlYWQpKQoocHJpbnQgKHBvd2VyIGJhc2UgZXhwb25lbnQpKQ==