Escriba una función llamada expo para calcular el exponencial (bn) utilizando la siguiente definición recursiva:
b0 = 1
bn = b * bn-1 (n >= 1)
La función no está definida para valores negativos de n. No pruebe la función para valores grandes ya que crece muy deprisa.
(define (expo b n)
(cond
((< n 0) (display '(No se puede calcular el numero con exponente negativo)))
((= n 0) 1)
(else (* b (expo b (- n 1))))))
Suscribirse a:
Enviar comentarios (Atom)
No hay comentarios:
Publicar un comentario