Rosetta Code

Almost prime: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Tim-brown (talk | contribs)
569 edits
=={{header|Racket}}== implementation added
Updated D entry
Line 132:
assert(number > 1);
} body {
alias UT = Unqual!T;
typeof(return) result;
UTUnqual!T n = number;
 
for (UTUnqual!T i = 2; n % i == 0;) {n /= i)
result ~= i;
for (Unqual!T i = 3; n />= i * i; i += 2)
whilefor (; n % i == 0); {n /= i)▼
}
for (UT i = 3; n >= i * i; i += 2) {
▲ while (n % i == 0) {
result ~= i;
n /= i;
}
}
 
if (n != 1)
Retrieved from "https://rosettacode.org/wiki/Almost_prime"