Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
12
Task/Ackermann-function/EasyLang/ackermann-function.easy
Normal file
12
Task/Ackermann-function/EasyLang/ackermann-function.easy
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
proc ackerm m n . r .
|
||||
if m = 0
|
||||
r = n + 1
|
||||
elif n = 0
|
||||
call ackerm m - 1 1 r
|
||||
else
|
||||
call ackerm m n - 1 h
|
||||
call ackerm m - 1 h r
|
||||
.
|
||||
.
|
||||
call ackerm 3 6 r
|
||||
print r
|
||||
Loading…
Add table
Add a link
Reference in a new issue