标题: 呵呵! [打印本页] 作者: 追梦者 时间: 2008-12-12 17:41
以下是我变得一个程序,用来求给定自然数中间的质数
clear all,clc
mark=zeros(10000,1);
for i=3:10000
for j=3:i-1
if mod(i,j)==0
mark(i)=i;
end
end
end
n=0;
for i=1:10000
if mark(i)==0
n=n+1;
end
end
c=1;
for i=1:10000
for j=c:n
if mark(i)==0
x(j)=i;
c=c+1;
break;
end
end
end
大家来开一下,把这个程序改变改变,试试能编出个什么程序