Сколько раз выполнится тело цикла (оператор x:=x-2) для фрагмента программы x:=-1; x:=x+1; while x>=0 do x:=x-2;