add while loop calculation of a fibonacci number

2024-10-09 15:54:51 +02:00 · 2024-10-09 15:54:51 +02:00 · 0473050229
commit 0473050229
parent a4a66a3041
1 changed files with 17 additions and 0 deletions
--- a/examples/fib.ang
+++ b/examples/fib.ang
@ -0,0 +1,17 @@
+
+# calculate fibonacci numbers with a loop
+
+x := 0
+
+n := 1
+p := 1
+
+while x < 100 {
+    f := n + p
+
+    p = n
+    n = f
+
+    write(f)
+    x = x + 1
+}