Raku kurss / Pielikums 🆕 / Plūsma un funkcijas / Izpildes plūsma un loģika / Exercises / Summējiet, līdz pārsniedz simtu

Risinājums: Summējiet, līdz pārsniedz simtu

Šeit ir iespējams risinājums uzdevumam.

Kods

my $sum = 0;
my $n   = 0;

loop {
    $n++;
    $sum += $n;
    last if $sum > 100;
}

say "reached $sum after adding 1..$n";

🦋 Atrodiet programmu failā sum-until.raku.

Izvade

reached 105 after adding 1..14

Komentāri

1. Kails loop { } atkārtojas mūžīgi; to izbeidz last if $sum > 100, tiklīdz summa pārkāpj slieksni.

2. 1 + 2 + … + 14 ir 105, pirmā daļsumma virs 100, tāpēc cikls apstājas ar $n pie 14.

3. Šo summu var pārbaudīt ar redukciju:

   say [+] 1..14; # 105

Kursa navigācija

← Summējiet, līdz pārsniedz simtu   |   Apakšprogrammas un funkcionālais stils →