Entry 754

scheme demo

Submitted by sanelz on May 6, 2008 at 4:54 p.m.
Language: Scheme. Code size: 71 bytes.

(define (fact num)
 (if (= num 1)
   1
   (* num (fact (- num 1)))))

This snippet took 0.00 seconds to highlight.

Back to the Entry List or Home.