Курс Raku / Додаток 🆕 / Порядок виконання та функції / Підпрограми та функційний стиль / Вправи / Сума цифр рекурсією

Розв’язання: Сума цифр рекурсією

Ось одне з можливих розв’язань задачі.

Код

sub digit-sum($n) {
    return $n if $n < 10;
    return $n % 10 + digit-sum($n div 10);
}

say digit-sum(12345);

🦋 Знайдіть програму у файлі recursive-digit-sum.raku.

Вивід

15

Коментарі

1. Базовим випадком є однозначне число, яке само собі є сумою цифр. Інакше процедура відлущує останню цифру через $n % 10 і рекурсує на решті — $n div 10.

Навігація курсом

← Сума цифр рекурсією   |   Композиція двох функцій →