Курс по Raku / Основи
/ Основи на управлението на
потока / Цикли / Използване на
while
Тест — цикъл while
1
Какво отпечатва тази програма?
my $n = 10;
while $n {
$n--;
}
say $n;| 0 | Отговор: (: 0, 1, −1 :) |
2
Как да предотвратим тази програма да се изпълнява безкрайно? Направете необходимите промени в кода.
| . | my $n = 5; |
| . | my $a = 10; |
| . | while $n { |
| n a | say $␣--; |
| . | } |