Corso di Raku / Appendice 🆕 / Lavorare con i dati / Numeri e matematica / Exercises / Radice numerica

Soluzione: Radice numerica

Ecco una possibile soluzione del compito.

Codice

my $n = 987654;

while $n >= 10 {
    $n = [+] $n.comb;
}

say $n;

🦋 Trova il programma nel file digital-root.raku.

Output

3

Commenti

  1. $n.comb divide il numero nei suoi singoli caratteri-cifra; [+] li somma, trasformando automaticamente le stringhe in numeri.

  2. Il ciclo si ripete finché il risultato ha più di una cifra, quindi si ferma non appena $n scende sotto 10.

Radice numerica   |   Passi di Collatz