Idoneal numbers: Difference between revisions

Content added Content deleted

Inline

@@ Line 98: / Line 98: @@
     FOR n WHILE count < max count DO
         BOOL idoneal := TRUE;
-        FOR a TO n - 2 WHILE count < max count AND idoneal DO
+        FOR a TO n - 2 WHILE idoneal DO
             FOR b FROM a + 1 TO n - 1
             WHILE INT ab = a * b;
-                  ab < n AND count < max count AND idoneal
+                  ( ab + a + b ) < n AND idoneal
             DO
                 FOR c FROM b + 1 TO n