Запишите число, которое будет напечатано в результате выполнения программы. var s, n: integer; begin s:=47; n:=1; while s>0 do begin s:=s-9; n:=n+4 end; writeln(n) end.

Ответ: 25

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

1. Инициализация переменных:
   • s присваивается значение 47.
   • n присваивается значение 1.
2. Цикл while (s > 0):
   Цикл выполняется до тех пор, пока значение s больше 0.
3. Шаг 1:
   • s = 47 - 9 = 38
   • n = 1 + 4 = 5
4. Шаг 2:
   • s = 38 - 9 = 29
   • n = 5 + 4 = 9
5. Шаг 3:
   • s = 29 - 9 = 20
   • n = 9 + 4 = 13
6. Шаг 4:
   • s = 20 - 9 = 11
   • n = 13 + 4 = 17
7. Шаг 5:
   • s = 11 - 9 = 2
   • n = 17 + 4 = 21
8. Шаг 6:
   • s = 2 - 9 = -7
   • n = 21 + 4 = 25
9. Цикл завершается, так как s становится меньше 0.
10. Выводится значение n.

Ответ: 25