Задание

Запишите значение переменной k, полученное в результате работы следующей программы:

var k, i: integer;
begin
k := 2;
for i := 0 to 2 do
k := i + 3 * k;
writeln\(k\);
end.