Здравствуйте.
Задача такая - Вычислить...
остальное прикрепляю к картинке...
По поиску в форуме вроде похожего нету
Задачу я понял, но вот загвостка.
Ясно, что введенную an нужно вычислять по формуле,
а для нее требуется 3 предыдущих значения an.
Вот мой код, на котором я запнулся:


Господа, у меня вопрос
Неужели нужно запоминать предыдущие значения для вычисления остатка?
Или может кто-нибудь сможет подсказать другое решение?
Буду благодарен
Пасиб.

Ничего не нужно запоминать... Тебе вполне достаточно в каждый момент времени 4-х переменных:

var
  a_1, a_2, a_3, a_k: real;
  i, n: integer;

begin
  n := 20;
  a_1 := 0; a_2 := 0; a_3 := 1.5;

  for i := 4 to n do begin
    a_k := ((i + 1)/(sqr(i)+1))*a_3 - a_1*a_2;

    a_1 := a_2; a_2 := a_3; a_3 := a_k; { Продвигаемся вперед }
  end;
  writeln('a(n) = ', a_k);
end.

Гм... volvo...
Действительно, присваивание значений переменных к следующим по порядку...
Спасибо