Revision as of 13:48, 25 May 2015 (view source) rosettacode>Nullmove (→‎{{header\|Nim}}) ← Older edit		Revision as of 06:32, 27 May 2015 (view source) Franck (talk \| contribs) m (→‎{{header\|Oforth}}: Replace rem by mod) Newer edit →
Line 1,158: =={{header\|Oforth}}== <lang Oforth>~~func~~: isPerfect(n) { \| i \| 0 n 2 / loop: i [ n i ~~rem~~mod ifZero: [ i + ] ] n == } </lang> {{out}}

Perfect numbers (view source)