github
/
ruby
зеркало из https://github.com/github/ruby.git
1
0
Форкнуть 0
Код Задачи Пакеты Проекты Релизы Вики Активность
ruby/benchmark/other-lang/fact.scm

9 строки
119 B
Scheme
Исходник Ответственный История

(define (fact n)
(if (< n 2)
1
(* n (fact (- n 1)))))
(dotimes (i 10000)
(fact 100))
Ссылка в новой задаче Показать git blame Копировать постоянную ссылку