Определите, что будет напечатано в результате работы фрагмента программы. var n, s: integer; begin n:=4; s:=0; while n<=8 do begin s:=s+n; n:=n+1 end; write(s) end.

Ответ: 30

Пошаговое решение:

• Шаг 1: Инициализация переменных: n = 4, s = 0.
• Шаг 2: Цикл while n <= 8 do begin
  • Итерация 1: s = s + n = 0 + 4 = 4, n = n + 1 = 4 + 1 = 5
  • Итерация 2: s = s + n = 4 + 5 = 9, n = n + 1 = 5 + 1 = 6
  • Итерация 3: s = s + n = 9 + 6 = 15, n = n + 1 = 6 + 1 = 7
  • Итерация 4: s = s + n = 15 + 7 = 22, n = n + 1 = 7 + 1 = 8
  • Итерация 5: s = s + n = 22 + 8 = 30, n = n + 1 = 8 + 1 = 9
• Шаг 3: Цикл завершается, так как n = 9, и условие n <= 8 больше не выполняется.
• Шаг 4: Вывод значения переменной s.

Ответ: 30