前六个素数是: 2, 3, 5, 7, 11, 13, 可以看到第六个素数是13.
问第10001个素数是几？
answer = last $ take 10001 (sieve [2..])
where sieve (x:xs) = x:(sieve [n|n<-xs,n`mod`x/=0 ] )
是104743， 用的是最原始的筛法，花了我破机器五十秒
前六个素数是: 2, 3, 5, 7, 11, 13, 可以看到第六个素数是13.
问第10001个素数是几？
answer = last $ take 10001 (sieve [2..])
where sieve (x:xs) = x:(sieve [n|n<-xs,n`mod`x/=0 ] )
是104743， 用的是最原始的筛法，花了我破机器五十秒
本文标题：第七日 第一万零一个素数
本文链接：https://www.haomeiwen.com/subject/apsmgttx.html
网友评论