print map {
  "$_\n"
} grep {
  $_ == sum map { $_ ** 3 } split //
} 100 .. 999

##</code><code>##

print "$_\n" for grep {
  $_ == sum map $_ ** 3, split //
} 100 .. 999