10001th prime: Difference between revisions

→‎Idiomatic awk: legible variables
imported>Nmz
(Added an idiomatic awk section →‎{{header|AWK}})
imported>Nmz
(→‎Idiomatic awk: legible variables)
Line 109:
}
 
# npos: positive
function PrimePosPosPrimePosition(npos, pprime){
npos -= ( (npos==1) ? pprime=2 : pprime=3 ) - 1
while (npos)
if (IsOddPrime(pprime+=2)) npos--
return pprime
}
 
BEGIN { print PrimePosPosPrimePos(10001) }
 
</syntaxhighlight>
Anonymous user