Чему будет равен результат выполнения фрагмента программы? a: =12 if a div 2> =6 then b: =a mod 5 else b: =a div 3 write (a-b); 1)2 2)8 3)12 4)10

Var a,b:integer;

begin
a:=12;
if a div 2>=6 then 
b:=a mod 5 
else b:=a div 3; 
write (a-b);
end.

Вывод 
10