8 lines
94 B
Text
8 lines
94 B
Text
|
#! /usr/bin/bc -q
|
||
|
|
|
||
|
|
define f(x) {
|
||
|
|
if (x <= 1) return (1); return (f(x-1) * x)
|
||
|
|
}
|
||
|
|
f(1000)
|
||
|
|
quit
|