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