7 lines
146 B
Text
7 lines
146 B
Text
say gather {
|
|
for n in (1..2200) {
|
|
if ((n & (n-1) == 0) || (n%%5 && ((n/5) & (n/5 - 1) == 0))) {
|
|
take(n)
|
|
}
|
|
}
|
|
}
|