Find square difference: Difference between revisions

Content added Content deleted

Inline

@@ Line 57: / Line 57: @@
 <lang rebol>i: 1
 while ø [
-    if 1000 < (i*i)-(dec i)*(dec i)
+    if 1000 < (i^2)-(dec i)^2
         -> break
     i: i + 1