Готовлюсь к егэ по информатике. простая, но мои мозги ослабли после отдыха и не функционируют. определите, что будет напечатано в результате работы следующего фрагмента программы: var a,b: integer; begin a: =8; b: =-4; while not (a=2) do if b> 0 then a: =a div 2 else begin a: =a div 2; b: =-b; end; a: =-a+2*b; write(a); end.