Data update

Task/Continued-fraction/EasyLang/continued-fraction.easy

@@ -0,0 +1,50 @@
+numfmt 8 0
+func calc_sqrt .
+   n = 100
+   sum = n
+   while n >= 1
+      a = 1
+      if n > 1
+         a = 2
+      .
+      b = 1
+      sum = a + b / sum
+      n -= 1
+   .
+   return sum
+.
+func calc_e .
+   n = 100
+   sum = n
+   while n >= 1
+      a = 2
+      if n > 1
+         a = n - 1
+      .
+      b = 1
+      if n > 1
+         b = n - 1
+      .
+      sum = a + b / sum
+      n -= 1
+   .
+   return sum
+.
+func calc_pi .
+   n = 100
+   sum = n
+   while n >= 1
+      a = 3
+      if n > 1
+         a = 6
+      .
+      b = 2 * n - 1
+      b *= b
+      sum = a + b / sum
+      n -= 1
+   .
+   return sum
+.
+print calc_sqrt
+print calc_e
+print calc_pi