3 lines
68 B
Racket
3 lines
68 B
Racket
|
|
(define (factorial n)
|
||
|
|
(for/product ([i (in-range 1 (+ n 1))]) i))
|