Anonymous user
Smallest numbers: Difference between revisions
m
→{{header|REXX}}: changed a comment.
m (changed "number" to "positive integer".) |
m (→{{header|REXX}}: changed a comment.) |
||
Line 694:
u= 0; !.= . /*number of unique #'s found; semaphore*/
$=; idx= 0 /*define $ output list; index to 0.*/
do j=0 for hi /*look for a power of
do k=1 until pos(j, k**k)>0 /*calculate a bunch of powers (K**K). */
end /*k*/
|