19 lines
153 B
Text
19 lines
153 B
Text
fact
|
|
if n < 1
|
|
return
|
|
endif
|
|
* n fn fn
|
|
- n
|
|
call fact
|
|
return
|
|
|
|
start
|
|
|
|
if i < 20
|
|
1 fn
|
|
i n
|
|
call fact
|
|
fn []
|
|
+ i
|
|
goif
|
|
endif
|