Add tasks for all the new languages

2016-12-05 23:44:36 +01:00 · 2016-12-05 23:44:36 +01:00 · bba7bfd280
commit bba7bfd280
parent 9dc3c2bb62
13208 changed files with 134745 additions and 0 deletions
--- a/Task/Exponentiation-operator/Ring/exponentiation-operator.ring
+++ b/Task/Exponentiation-operator/Ring/exponentiation-operator.ring
@ -0,0 +1,20 @@
+see "11^5 = " + ipow(11, 5) + nl
+see "pi^3 = " + fpow(3.14, 3) + nl
+
+func ipow a, b
+     p2 = 1
+     for i = 1 to 32
+         p2 *= p2
+         if b < 0  p2 *= a ok
+         b = b << 1
+     next
+     return p2
+
+func fpow a, b
+     p = 1
+     for i = 1 to 32
+         p *= p
+         if b < 0  p *= a ok
+         b = b << 1
+     next
+     return p