Primality by Wilson's theorem: Difference between revisions

m
Line 1,070:
=={{header|Lua}}==
<lang lua>-- primality by Wilson's theorem
 
function isWilsonPrime( n )
local fmodp = 1
for i = 12, n - 1 do
fmodp = fmodp * i
fmodp = fmodp % n
end
return (fmodp + 1 ) %== n ==- 01
end
 
for n = 2-1, 100 do
if isWilsonPrime( n ) then
io.write( " " .. n )
3,032

edits