Как выбрать инструмент для компьютерного моделирования?

Var
  y0, yk, yk1, eps, d: double;
  i: integer;

begin
  y0 := 0; yk1 := y0;
  Write('Введите величину погрешности: ');
  Readln(eps);
  repeat
    yk := (yk1 + 1) / (yk1 + 2);
    d := yk - yk1;
    if d >= eps then yk1 := yk
  until d < eps;
  Writeln('yn=', yk)
end.

Тестовое решение:

Введите величину погрешности: 1e-8
yn=0.618033988205325

Написано повторить 3 раза, значит, иксы умножаем на 3, и также y.
3*(-1+0+4)=3*3=9 (по координате X - будет 9) идём дальше
3*(0+2-4)=3*(-2)=-6 
В итоге, получаем координату, где он остановился, то бишь (9;-6), следовательно, чтобы ему вернуться нужно умножить на -1 и получим (-9;6).
Ответ: 3)

P.s. Как так? Ты же инфу сдаешь, она в ОГЭ очень легкая.

367. в инете полно сайтов по переводу)