Add files via upload

This commit is contained in:
nora 2021-05-28 14:38:16 +02:00 committed by GitHub
parent 7917a81543
commit 3b28884385
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
3 changed files with 48 additions and 0 deletions

View file

@ -0,0 +1,9 @@
10 factorial 1 goto exit
function factorial 1
dup not goto isZero
pop dup 1 - factorial * return
:isZero
1 pop return
:exit pop dup nout