Nth prime by o-cn

<?for($a[1]=$i=2;$i++<11e4||print@$a[+~~fgets(STDIN)]."
";)for(;$b=$a[++$$i],$b*$b>$i?!$a[]=$i:$i%$b;);

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page