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

Var f,n: integer;
Begin
f := 4;
f := f*3;
For n := 1 to 4 do
f := f + n;
Writeln\(f\);
End.