Primality by Wilson's theorem: Difference between revisions
→{{header|Chipmunk Basic}}
Basicgames (talk | contribs) |
|||
Line 441:
210 if fct = n-1 then print i;
220 end function</syntaxhighlight>
==={{header|Craft Basic}}===
<syntaxhighlight lang="basic">for i = 2 to 100
let f = 1
for j = 2 to i - 1
let f = (f * j) % i
wait
next j
if f = i - 1 then
print i
endif
next i
end</syntaxhighlight>
==={{header|GW-BASIC}}===
| |||