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

a:=10;
for i:=0 to 2 do begin
a:=a-i
end;