第1个回答 2011-04-01
x=1:1:100;
k=0;
for i=1:1:100
if (floor(x(1,i)/2)==x(1,i)/2);
k=k+1;
else
k=k;
end
end
oushu=k;%偶数
jishu=100-k;%奇数
%质数很麻烦哦,可能要逐个除
x=1:1:100;
a=0;
s=(size(x));
for i=1:1:s(1,2)/2
k=0;
for j=3:1:floor(((x(1,(2*i-1)))^0.5));
if floor(x(1,(2*i-1))/j)==(x(1,(2*i-1))/j);
k=k+1;
else
k=k;
end
end
if (k==0);
a=1+a;
else
a=a;
end
end
a+1%质数
第2个回答 2011-04-01
clear all
N=100;
J=1;
O=0;
Z=1;
for i=2:100
if mod(i,2)==1
J=J+1;
else
O=O+1;
end
for j=2:(i-1)
if mod(i,j)==0
break;
end
if j==(i-1)
Z=Z+1;
end
end
end本回答被提问者采纳