fib.while
changeset 93 4794759139ea
parent 92 e85600529ca5
child 94 9ea667baf097
--- a/fib.while	Sat Jun 15 09:11:11 2013 -0400
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,15 +0,0 @@
-/* Fibonacci Program
-   input: n
-*/
-
-n := 19;
-minus1 := 0;
-minus2 := 1;
-while n > 0 do {
-       temp := minus2;
-       minus2 := minus1 + minus2;
-       minus1 := temp;
-       n := n - 1
-};
-write minus2 
-