clc;        %清空命令行窗口的数据

clear;      %清除工作空间的变量

k = ;

n = ;      %素数的个数

while

    zzs(k) = input('请输入正整数： ');

    if zzs(k) ==

        break;

    end

    flag = ;   %判断是否为素数

    for yz =  : sqrt(zzs(k))    %因子从2开始至该数的平方根

        if mod(zzs(k),yz) ==       %除尽因子，就不为素数

            disp(['不是素数',yz])

            flag = ;

            break;

        end

    end

    if flag ==   | zzs(k) ==             %2也算素数

        n = n + ;

        sus(n) = zzs(k);

    end

    k = k +;

end

disp(['你共输入了',num2str(k-),'个正整数。依次为：'])

disp(zzs(:k-))

if n==

    disp('这些数中没有素数')

else

    disp(['其中的素数有',n,'个，分别为：'])

    disp(sus)

end