exa2_7.m

来自「MATLAB 的一些编程,基本的程序,为出学MATLAB的初学者」· M 代码 · 共 7 行

clear all;
N=input('N= ');x=2:N;
for u=2:sqrt(N)
    n=find(rem(x,u)==0 &x~=u);
    x(n)=[];
end
x