Чему будет равно значение целой переменной «a» после выполнения этого фрагмента программы?

a:=4;
for i:=1 to 4 do begin
a:=a+a
end;