Определите, что будет напечатано в результате работы следующей программы.
Var k,і: integer;
Begin k := 2;
For і := 0 to 2 do
k := 3*k + і;
Writeln\(k\);
End.