RosettaCodeData/Task/Conditional-structures/Stata/conditional-structures-4.stata
2018-06-22 20:57:24 +00:00

13 lines
198 B
Text

function isprime(n) {
if (n<5) return(n==2 | n==3)
else if (mod(n, 2)==0) return(0)
else {
for (k=3; k*k<=n; k=k+2) {
if (mod(n, k)==0) return(0)
}
return(1)
}
}
isprime(10^12-11)
1