Ackermann function: Difference between revisions

Content added Content deleted
No edit summary
Line 1,966: Line 1,966:
<lang elena>import extensions.
<lang elena>import extensions.


ackermann = (:m:n)
ackermann(m,n)
[
[
if((n < 0)||(m < 0))
if((n < 0)||(m < 0))
Line 1,980: Line 1,980:
! [ ^ackermann(m - 1,ackermann(m,n-1)) ]
! [ ^ackermann(m - 1,ackermann(m,n-1)) ]
]
]
].
]


public program =
public program
[
[
0 to:3 do(:i)
0 to:3 do(:i)
Line 1,992: Line 1,992:
].
].


console readChar.
console readChar
].</lang>
]</lang>
{{out}}
{{out}}
<pre>
<pre>