gitweb on Svarog

projekti pod git sistemom za održavanje verzija -- projects under the git version control system
docs - new txt about running the ant tasks
[mjc2wsl.git] / samples / RekFib.mj
index 1c297e5..f4e3f09 100644 (file)
@@ -4,13 +4,13 @@ program RekFib{
        {
                if (f==0) return 0;
                if (f==1) return 1;
-               return fib(f-1)+fib(f-2) ;
+               return fib(f-2)+fib(f-1) ;
        }
        
        void main()
-       int i;
        {
-               print(fib(0));
-               print(fib(7));
+               print(fib(0),3);
+               print(fib(2),3);
+               print(fib(7),3);
        }
 }
\ No newline at end of file
Svarog.pmf.uns.ac.rs/gitweb maintanance Doni Pracner