用sas软件求1-1000的质数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

data xx;
do i=1 to 1000;
do j=1 to i-1;
if mod(i,j)=0 then leave;
else continue;
end;
drop j;
run;
proc print;
run;
帮忙看哪里出现问题，运行不了

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：sas软件 continue print Leave Then continue 软件

data tmp(drop=i);
n=2;
output;
do n=3 to 10000 by 2;
  do i=2 to n-1;
   if mod(n,i)=0 and i^=n-1 then leave;
   if i=n-1 then output;
  end;
end;
run;
proc print;
run;