clear;
clc;
i = 1;
for k = 1:500
sumk = 0;
for m = 1:k/2
if mod(k,m)==0 %取模，即求因子
sumk = sumk+m; %是因子的话相加
end
end
if sumk==k; %比较因子和 和 原始值
y(i) = k; %如果相等 输出
i = i+1;
end
end
y
结果：
y =
6 28 496
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024