Question

Введите результат выполнения фрагмента программы: z:=20; k:=z+4; while k>=4 do k:=k-2; k:=k+1; writeln(k);

Answer 1

Ответ:

Объяснение:

Результат: 3.

В цикле while значение k уменьшается до k=2, последнее сравнение происходит при к = 4, при этом значение к также уменьшается на 2.

После цикла значение к (равное 2) увеличивается на 1, тсановится равным 3.

Answer 2

Давайте разберем этот фрагмент программы шаг за шагом и опишем результат выполнения каждой команды. 1. `z := 20;` - Здесь присваивается значение 20 переменной `z`. Теперь `z` равно 20. 2. `k := z + 4;` - Значение переменной `k` устанавливается как сумма `z` (20) и 4, что дает `k` равное 24. 3. `while k >= 4 do` - Этот оператор начинает цикл, который будет выполняться, пока значение `k` больше или равно 4. 4. `k := k - 2;` - В теле цикла значение `k` уменьшается на 2, поэтому оно становится равным 22. 5. `k := k + 1;` - После этого значение `k` увеличивается на 1, и теперь `k` равно 23. 6. `writeln(k);` - Эта команда выводит текущее значение `k` (23) на экран. 7. Затем программа возвращается к началу цикла, так как условие `k >= 4` по-прежнему выполняется, и происходит повторный шаг. 8. `k := k - 2;` - Снова уменьшение `k` на 2 приводит к тому, что `k` становится равным 21. 9. `k := k + 1;` - После этого `k` увеличивается на 1 и становится равным 22. 10. `writeln(k);` - Значение 22 выводится на экран. 11. Программа возвращается к началу цикла, так как `k` (22) по-прежнему больше или равно 4. 12. `k := k - 2;` - Уменьшение `k` на 2 приводит к значению 20. 13. `k := k + 1;` - После этого `k` увеличивается на 1 и становится равным 21. 14. `writeln(k);` - Значение 21 выводится на экран. 15. Программа возвращается к началу цикла, так как `k` (21) по-прежнему больше или равно 4. 16. `k := k - 2;` - Уменьшение `k` на 2 приводит к значению 19. 17. `k := k + 1;` - После этого `k` увеличивается на 1 и становится равным 20. 18. `writeln(k);` - Значение 20 выводится на экран. 19. Программа возвращается к началу цикла, так как `k` (20) по-прежнему больше или равно 4. 20. `k := k - 2;` - Уменьшение `k` на 2 приводит к значению 18. 21. `k := k + 1;` - После этого `k` увеличивается на 1 и становится равным 19. 22. `writeln(k);` - Значение 19 выводится на экран. 23. Программа возвращается к началу цикла, так как `k` (19) по-прежнему больше или равно 4. 24. `k := k - 2;` - Уменьшение `k` на 2 приводит к значению 17. 25. `k := k + 1;` - После этого `k` увеличивается на 1 и становится равным 18. 26. `writeln(k);` - Значение 18 выводится на экран. Программа продолжает выполняться, пока `k` остается больше или равно 4, и каждое новое значение `k` выводится на экран. Как только `k` становится меньше 4, цикл завершается, и выполнение программы завершается.