Anonymous user
Semiprime: Difference between revisions
Added Lua version
m (→version 2: changed the output window height.) |
(Added Lua version) |
||
Line 643:
<pre>julia> filter(semiprime, 1:100)
[4,6,9,10,14,15,21,22,25,26,33,34,35,38,39,46,49,51,55,57,58,62,65,69,74,77,82,85,86,87,91,93,94,95]</pre>
=={{header|Lua}}==
<lang Lua>
function semiprime (n)
local factors = {2, 0}
while factors[2] < 3 and n ~= 1 do
if n % factors[1] == 0 then
n = n / factors[1]
factors[2] = factors[2] + 1
else
factors[1] = factors[1] + 1
end
end
return factors[2] == 2
end
for n = 1675, 1680 do
print(n, semiprime(n))
end
</lang>
{{out}}
<pre>
1675 false
1676 false
1677 false
1678 true
1679 true
1680 false
</pre>
=={{header|Maple}}==
| |||