fib.while
changeset 84 719fd738d2a0
parent 83 bd61b03b9eaa
--- a/fib.while	Wed Nov 28 07:03:29 2012 +0000
+++ b/fib.while	Wed Nov 28 08:28:26 2012 +0000
@@ -1,17 +1,15 @@
 /* Fibonacci Program
    input: n
-   output: fib_res */
+*/
 
 n := 19;
 minus1 := 0;
 minus2 := 1;
-temp := 0;
 while n > 0 do {
        temp := minus2;
        minus2 := minus1 + minus2;
        minus1 := temp;
        n := n - 1
 };
-fib_res := minus2;
-write fib_res 
+write minus2