Запишите значение переменной f, полученное в результате работы следующей программы:
var f, n: integer;
begin
f := 4;
f := f*3;
for n := 1 to 4 do
f := f + n;
writeln(f);
end.