Определите значение переменной X После выполнения следующего фрагмента программы:

x:=1;
for i:=1 to 5 do begin x:=x+2*i;
x:=x+1;
end;
​