Функция Print - Lisp

Узнай цену своей работы

Формулировка задачи:

Есть функция, рекурсивно вычисляющая степень числа. Необходимо используя функцию print выводить информацию о результате выполнения отдельного рекурсивного вызова.
(defun stepen (x n)
 (cond ((= n 0) 1)
 (t (* x (stepen x (- n 1)))))
)

Решение задачи: «Функция Print»

textual
Листинг программы
(stepen 5 3)
 
  Вход в функцию stepen Аргументы: 5 3
    Вход в функцию stepen Аргументы: 5 2
      Вход в функцию stepen Аргументы: 5 1
        Вход в функцию stepen Аргументы: 5 0
        Возврат из функции stepen Результат: 1
      Возврат из функции stepen Результат: 5
    Возврат из функции stepen Результат: 25
  Возврат из функции stepen Результат: 125
 
==> 125

Оцени полезность:

13   голосов , оценка 3.846 из 5