用mathematica编写筛选程序求100到1000的所有素数.

来源:百度知道 编辑:UC知道 时间:2024/05/20 15:56:15
输出说有素数,也需要一些概率判别法的程序。谢谢了

function a=question(n)
a=[];
for i=2:n
k=0;
for j=2:i-1
if ~mod(i,j)
k=1;
break;
end
end
if ~k
a=[a,i];
end
end
用时只要把for i=2:n 改为for i=100:10000

不知道用matlab的可以吗?

Select[Table[Prime[i], {i, 1, 500}], # > 100 && # < 1000 &]
就这一句就搞定