diff options
Diffstat (limited to 'comp/lucas-standen-NEA/writeup2/examples/fib/zpy')
| -rw-r--r-- | comp/lucas-standen-NEA/writeup2/examples/fib/zpy/fib.zpy | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/comp/lucas-standen-NEA/writeup2/examples/fib/zpy/fib.zpy b/comp/lucas-standen-NEA/writeup2/examples/fib/zpy/fib.zpy new file mode 100644 index 0000000..adb2a71 --- /dev/null +++ b/comp/lucas-standen-NEA/writeup2/examples/fib/zpy/fib.zpy @@ -0,0 +1,14 @@ +(defun fib int n:int) + (if (< n 2)) + (return n) + (endif) + + (return (+ (fib (- n 1)) (fib (- n 2)))) +(endfun) + +(defun main int) + (printstr "give me a number (bellow 30 if you want it to be quick): ") + (let n:int (readint)) + (printint (fib n)) + (printchar '\n') +(endfun) |