Perfect numbers: Difference between revisions

Content added Content deleted

Inline

@@ Line 1,626: / Line 1,626: @@
             =Factors
       }
-      \\ Check a perfect and a non perfect number
-      \\ using normal decompose to prime numbers
       p=2 : n=3 : n1=2
       Document Doc$
+      \\ Check a perfect and a non perfect number
+      \\ using normal decompose to prime numbers
       IsPerfect(Decompose(28), 28)
       IsPerfect(Decompose(1544), 1544)
@@ Line 1,658: / Line 1,658: @@
                   s+=z+n/z
             }
-            Local a$=format$("{0} is {1}perfect number", n, If$(s=n->"", "mot "))
+            Local a$=format$("{0} is {1}perfect number", n, If$(s=n->"", "not "))
             Doc$=a$+{
             }
@@ Line 1,674: / Line 1,674: @@
 <pre style="height:30ex;overflow:scroll">
 is perfect number
-is mot perfect number
+is not perfect number
 is perfect number
 is perfect number