составить программу

[ДмитрийРэй]

А вот и само задание:
Разработать алгоритм и составить программу вычисления таблицы значений функции, заданной в виде разложения в ряд. Значение функции вычислять с точностью Eps>0, т.е. вычисление суммы членов ряда необходимо прекратить, когда абсолютная величина очередного члена ряда разложения окажется меньше Eps: |ак| <Eps.(Eps - эпселонт),(к-индекс)
При вычислении очередного члена целесообразно воспользоваться рекурентным выражением:
ак+1=ск*ак; к= 0, 1, 3, ...,(к-индекс)
где ак - некоторый к-ый член ряда; ак+1 - следующий к+1-ый член ряда; ск - коэффициент, определяемый номером к.
При составлении программы необходимо по возможности воспользоваться операторами организации циклов WHILE, REPEAT, FOR.
Границы интервала вычислений функций a и b, величина шага изменения аргумента h и точность вычисления функции Eps задаются при вводе. На печать выводятся номер по порядку, значение аргумента, соответствующие ему, значение функции и номер члена ряда, на котором закончилось вычисление значение функции, в форме таблицы:
№ | Х | f (x) | № чл.р.
1
2
3
...
Вот сама функция: f(x)=x-x^3/3!+x^5/5! - x^7/7!+...(-1^k)*x^(2k+1)/(2k+1)!+...

Буду очень благодарен за помощь!

[RUSt88]

выполню за вознаграждение, обращайтесь

[Stilet]

воспользоваться рекурентным выражением

Задачка простая но что такое "рекурентное выражение"? (Я не спец в математике)

[ДмитрийРэй]

Stilet
Рекурентное выражение - это что-то вроде выражения следующего члена последовательности через предыдущий

[ДмитрийРэй]

кстати математически я получил значения и ck и ak:
ak=(-1)^n * x^(2n+1)/(2n+1)!
ck=ak+1/ak
ck=-x^2/(2n+2)*(2n+3)

Вот такие значение...
Нужен код программы, я просто с такими не сталкивался ещё.

[Stilet]

Хм...
В общем вот мое предложение:

var x,y:double; s,fac,i:integer;
begin
 x:=2;fac:=1;  s:=-1;
 for i:=1 to 5 do begin
  fac:=fac*i;
  y:=y+s*exp((2*i+1)*ln(x))/fac;
  s:=s*-1;
  writeln(y:5:2);
 end;
readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.

Табулирование красивое сам доделай.

[ДмитрийРэй]

Stilet
Спасибо большое, попробую