Anonymous user
Primality by trial division: Difference between revisions
Logo
m (→{{header|TI-83 BASIC}}: Sped up calculation) |
(Logo) |
||
Line 147:
return true;
}
=={{header|Logo}}==
to prime? :n
if :n < 2 [output "false]
if :n = 2 [output "true]
if equal? 0 modulo :n 2 [output "false]
for [i 3 [sqrt :n] 2] [if equal? 0 modulo :n :i [output "false]]
output "true
end
=={{header|LSE64}}==
| |||