en !qiao qiao

[复制链接]

追梦者

13 主题	4 听众	594 积分

收听TA
发消息

群组: 数模应用

群组: LINGO

群组: 四川农业大学数学建模协会

群组: 重庆交通大学数学建模协会

群组: Mathematica研究小组

电梯直达

1^#

发表于 2008-12-12 17:39 |只看该作者 |倒序浏览

由第一个程序改编而来，不过范围更加宽泛。
我定义了一个函数。
function y=zhishu(m)
mark=zeros(m,1);
for i=3:m
for j=3:i-1
if mod(i,j)==0
mark(i)=i;
end
end
end
n=0;
for i=1:m
if mark(i)==0
n=n+1;
end
end
c=1;
for i=1:m
for j=c:n
if mark(i)==0
x(j)=i;
c=c+1;
break;
end
end
end
此程序中任你选一个自然数m，引用函数即可。