RosettaCodeData/Task/100-doors/AppleScript/100-doors-4.applescript

6 lines
133 B
AppleScript
Raw Permalink Normal View History

2017-09-23 10:01:46 +02:00
map(factorCountMod2, enumFromTo(1, 100))
2016-12-05 22:15:40 +01:00
on factorCountMod2(n)
{n, (length of integerFactors(n)) mod 2 = 1}
end factorCountMod2