Cursus Raku / Addendum 🆕 / Cum datis laborare / Numeri et mathematica / Exercises / Resolutio in factores primos

Solutio: Resolutio in factores primos

Ecce solutio possibilis huius exercitationis.

Codex

my $n = 360;
my @factors;

for 2..$n -> $d {
    while $n %% $d {
        @factors.push($d);
        $n div= $d;
    }
}

say @factors;

🦋 Inveni codicem fontem in archivo prime-factors.raku.

Exitus

[2 2 2 3 3 5]

Commentarii

  1. Pro unoquoque divisore candidato $d, while internum illum ex $n totiens dividit quotiens capit, $d singulis vicibus immittens. Quia factores minores prius removentur, omnis $d qui adhuc $n dividit certo primus est.

  2. $n div= $d divisio integra rursus in $n est; numerum minuit donec nihil nisi 1 restet.

Resolutio in factores primos   |   Maximus communis divisor et minimum commune multiplum