isprime.asv

来自「关于质数的一些程序」· ASV 代码 · 共 7 行

function y=isprime(x)
k=length(x);
y=1;
for m=1:k
    if(rem(k,m)==0) y=0;
    end
end