Запишите значение переменной y, полученное в итоге работы следующей программы. Текст

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