1001コメント288KB

【SICP】計算機プログラムの構造と解釈【Scheme】

■ このスレッドは過去ログ倉庫に格納されています

0855デフォルトの名無しさん

2008/02/11(月) 17:08:15

(define (Fact my-fact)
(lambda (n)
(if (= n 0)
1
(* n (my-fact (- n 1))))))

(define fact (Y Fact))

(fact 10)
3628800

■ このスレッドは過去ログ倉庫に格納されています