RosettaCodeData/Task/Perfect-numbers/MATLAB/perfect-numbers-1.m
2023-07-01 13:44:08 -04:00

9 lines
160 B
Matlab

function perf = isPerfect(n)
total = 0;
for k = 1:n-1
if ~mod(n, k)
total = total+k;
end
end
perf = total == n;
end