10. (3 балла). Запишите значение переменной к, полученное в результате работы следующей программы. Var k, i: integer; Begin k := 4; For i := 1 to 3 do k := i + 2*k; Writeln(k); End.

Пошаговый расчет цикла:

• Начальное значение: k = 4.
• Цикл For i := 1 to 3 do:
• i = 1:
• k := i + 2*k → k = 1 + 2*4 = 1 + 8 = 9
• i = 2:
• k := i + 2*k → k = 2 + 2*9 = 2 + 18 = 20
• i = 3:
• k := i + 2*k → k = 3 + 2*20 = 3 + 40 = 43
• Конец цикла.

Ответ: 43