20 lines
153 B
Text
20 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
|