10.(3 балла). Запишите значение переменной к, полученное в результате работы следующей программы.

Решение:

Программа:

Var k, i: integer;
Begin
k := 2;
For i := 0 to 2 do
k := i + 3*k;
Writeln(k);
End.

Разберем выполнение цикла For i := 0 to 2 do:

1. i = 0:
• \( k := i + 3*k \)
• \( k := 0 + 3*2 \)
• \( k := 6 \)
2. i = 1:
• \( k := i + 3*k \)
• \( k := 1 + 3*6 \)
• \( k := 1 + 18 \)
• \( k := 19 \)
3. i = 2:
• \( k := i + 3*k \)
• \( k := 2 + 3*19 \)
• \( k := 2 + 57 \)
• \( k := 59 \)

После завершения цикла переменная \( k \) будет равна 59.

Ответ: 59.