[angvelem]

Это уже черезчур. Считать до трёх умеешь? Где здесь передаётся 3!!! параметра?

Код:

  fk := a[n] + fk(a[n -1] * (Rund(Power(x, n + 1)));

не учили, что передаваемые параметры отделяются запятыми?