Курс по Raku / Основи / Числа / Упражнения / Споделяне на ябълка

Решение: Споделяне на ябълка

Ето решението на задачата.

Код

my $N = 3;
my $K = 11;

my $gets = $K div $N;
my $remains = $K % $N;

say "Всеки човек получава $gets ябълка(и).";
say "Остават $remains ябълка(и).";

🦋 Можете да намерите пълния код във файла apple-sharing.raku.

Изход

С входни числа 3 и 11, програмата отпечатва следния изход:

$ raku exercises/numbers/apple-sharing.raku
Всеки човек получава 3 ябълка(и).
Остават 2 ябълка(и).

Променете началната стойност на $N и $K, за да моделирате други ситуации:

• $K е кратно на $N, например, 12 и 3;
• $K е равно на $N;
• $K е по-малко от $N.

Коментари

В програмата използваме два оператора: div за извършване на целочислено деление и % за получаване на остатъка от делението. Алтернативно, можете да направите изчисленията по следния начин:

my $gets = $K div $N;
my $remains = $K - $N * $gets;

Също така обърнете внимание как променливите се интерполират в низа.

Навигация по курса

← Стрингове / Дължина на стринг   |   Булев тип →