Определите значение переменной X после выполнения следующего фрагмента программы:
x:=1;
y:=5;
while x+y<10 do begin x:=x+2; y:=y-1; end;