Kurso de Raku / Esencoj / Bazoj de la regofluo / Bukloj / Uzante while

Kvizo — la while buklo

1

Kion ĉi tiu programo presas?

my $n = 10;
while $n {
    $n--;
}
say $n;
0Respondo: (: 0, 1, −1 :)

2

Kiel eviti ke ĉi tiu programo ruliĝu senfine? Faru la necesajn ŝanĝojn al la kodo.

.my $n = 5;
.my $a = 10;
.while $n {
n a    say $␣--;
.}

Kursa navigado

Uzante while   |   Uzante until