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