Anonymous user
Aliquot sequence classifications: Difference between revisions
m
→{{header|REXX}}: ussed the uppercase version of a REXX variable.
m (→{{header|REXX}}: ussed the uppercase version of a REXX variable.) |
|||
Line 605:
do q=1 until b.sociable \== 0 /*only one that has to be counted*/
call classify_aliquot -q /*the minus sign indicates ¬tell.*/
if b.what==1 then call show_class q,$ /*show 1st occurrence only*/
end /*q*/ /* [↑] until all classes found. */
say
| |||