ex3_13.m

来自「matlab教程 提供详细的技术说明」· M 代码 · 共 12 行

for m=1:500
s=0;
for k=1:m/2
if rem(m,k)==0
s=s+k;
end
end
if m==s
    disp(m);
end
end