14 lines
495 B
Text
14 lines
495 B
Text
var P = 2.powerful(1e9)
|
|
var achilles = Set(P.grep{ !.is_power }...)
|
|
var strong_achilles = achilles.grep { achilles.has(.phi) }
|
|
|
|
say "First 50 Achilles numbers:"
|
|
achilles.sort.first(50).slices(10).each { .map{'%4s'%_}.join(' ').say }
|
|
|
|
say "\nFirst 30 strong Achilles numbers:"
|
|
strong_achilles.sort.first(30).slices(10).each { .map{'%5s'%_}.join(' ').say }
|
|
|
|
say "\nNumber of Achilles numbers with:"
|
|
achilles.to_a.group_by{.len}.sort_by{|k| k.to_i }.each_2d{|a,b|
|
|
say "#{a} digits: #{b.len}"
|
|
}
|