RosettaCodeData/Task/Perfect-numbers/Smalltalk/perfect-numbers-2.st
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

1 line
60 B
Smalltalk

1 to: 9000 do: [ :p | (p isPerfect) ifTrue: [ p printNl ] ]