решение

Привет! Давай решим эту задачу вместе.

У нас есть фрагмент программы на языке Pascal:

i := 6
repeat
  i := i + 7
until i > 9

Первоначальное значение переменной i — 6. Затем цикл repeat-until увеличивает i на 7, пока i не станет больше 9.

1. Начальное значение i = 6.
2. В теле цикла выполняем i := i + 7, и i становится 6 + 7 = 13.
3. Условие until i > 9 проверяется сразу после выполнения тела цикла. Поскольку 13 > 9, цикл завершает работу.

Таким образом, после первого выполнения тела цикла значение i равно 13.

Ответ: 13.