Perfect numbers: Difference between revisions
Content deleted Content added
No edit summary |
|||
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:
s+=z+n/z
}
Local a$=format$("{0} is {1}perfect number", n, If$(s=n->"", "
Doc$=a$+{
}
Line 1,674:
<pre style="height:30ex;overflow:scroll">
28 is perfect number
1544 is
6 is perfect number
28 is perfect number
| |||