school

thing1's amazing school repo
Log | Files | Refs | Submodules | README

fib.zpy (270B)


      1 (defun fib int n:int)
      2 	(if (< n 2))
      3 		(return n)
      4 	(endif)
      5 
      6 	(return (+ (fib (- n 1)) (fib (- n 2))))
      7 (endfun)
      8 
      9 (defun main int)
     10 	(printstr "give me a number (bellow 30 if you want it to be quick): ")
     11 	(let n:int (readint))
     12 	(printint (fib n))
     13 	(printchar '\n')
     14 (endfun)