标题: 求助，求10000一下的素数的程序！ [打印本页] 作者: shiyiming 时间: 2008-10-23 15:58 标题: 求助，求10000一下的素数的程序！ [color=#FF0000:pv2lno0g][size=150:pv2lno0g]用SAS数据步列出10000以下的素数，写出程序。[/size:pv2lno0g][/color:pv2lno0g]作者: shiyiming 时间: 2008-10-23 17:47 标题: Re: 求助，求10000一下的素数的程序！ [code:2gqq1z1e]data aa;
do i=1 to 1000;
num=0;
do j=2 to i-1;
if mod(i,j)=0 then num+1;
end;
if num=0 then output;
end;
run;[/code:2gqq1z1e]作者: shiyiming 时间: 2008-10-31 09:59 标题: Re: 求助，求10000一下的素数的程序！ data aa;
do i=2 to 1000;
num=0;
do j=2 to i-1;
if mod(i,j)=0 then num+1;
end;
if num=0 then output;
end;
run;