Задание

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