Question

Установите что будет выведено на экран в результате выполнения следующей программы если n= 26 s:=0; repeat s:=s+n mod 10; n:=n div 10 until n=0; write(s);

Answer 1

В консоли будет выведено 8.

Answer 2

Давайте разберемся с этим кодом по шагам для значения n = 26:

1. s := 0; - Инициализация переменной s значением 0.
2. repeat - Начало цикла repeat...until.
3. s := s + n mod 10; - Значение s увеличивается на остаток от деления n на 10, то есть 26 mod 10 = 6, s становится равным 6.
4. n := n div 10; - Значение n делится на 10 и присваивается результату, то есть 26 div 10 = 2.
5. until n = 0; - Цикл повторяется до тех пор, пока n не станет равным 0.

Теперь пройдем цикл для нового значения n = 2:

1. s := s + n mod 10; - Значение s увеличивается на остаток от деления n на 10, то есть 2 mod 10 = 2, s становится равным 6 + 2 = 8.
2. n := n div 10; - Значение n делится на 10 и присваивается результату, но теперь n становится равным 0.

Цикл завершается, так как n стало равным 0.

Итак, после выполнения этой программы с начальным значением n = 26, на экран будет выведено число 8.