輸入數字,0結束,判斷輸入的數字中的素數
clc; %清空命令行窗口的數據 clear; %清除工作空間的變量 k = 1; n = 0; %素數的個數 while 1 zzs(k) = input('請輸入正整數: '); if zzs(k) == 0 break; end flag = 1; %判斷是否為素數 for yz = 2 : sqrt(zzs(k)) %因子從2開始至該數的平方根 if mod(zzs(k),yz) == 0 %除盡因子,就不為素數 disp(['不是素數',yz]) flag = 0; break; end end if flag == 1 | zzs(k) == 2 %2也算素數 n = n + 1; sus(n) = zzs(k); end k = k +1; end disp(['你共輸入了',num2str(k-1),'個正整數。依次為:']) disp(zzs(1:k-1)) if n==0 disp('這些數中沒有素數') else disp(['其中的素數有',n,'個,分別為:']) disp(sus) end