solution/cw3/fib.while
changeset 864 b5b1bc0a603b
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/solution/cw3/fib.while	Wed Dec 15 19:00:01 2021 +0000
@@ -0,0 +1,13 @@
+write "Fib: ";
+read n;  
+minus1 := 0;
+minus2 := 1;
+while n > 0 do {
+       temp := minus2;
+       minus2 := minus1 + minus2;
+       minus1 := temp;
+       n := n - 1
+};
+write "Result: ";
+write minus2 
+