Построить график функции

[Horknee]

Дана функция, заданная бесконечным рядом. С клавиатуры вводятся x и e (e - точность 0,001-0,00001), нужно вычислить бсконечную сумму с заданной точностью e. Вычисления прекращаются. когда очередное слагаемое по модулю меньше точности. Требуется, во-первых, вывести на экран таблицу значений i и суммы i слагаемых. Во-вторых, построить график этой функци. По оси абсцисс выволить i, по оси ординат сумму i слагаемых. Масштаб графика должен изменяться автоматически в зависимости от зеачений x.

_______

Ниже я прикрепил формулу, заранее огромное спасибо.

[eoln]

А что не получается-то?
Вот так в степень возводить: a в степени b = exp(b*ln(a))
Вот факториал

function fact(a: byte): longint;
begin
  if a > 1 then fact := a * fact(a-1)
  else fact := 1
end;

А полностью за 400р сделаю

[Horknee]

Сообщение от eoln

А что не получается-то?

Я просто раньше вообще не изучал паскаль, а мне тут сразу такое задали в универе

З.Ы. у меня завтра последний день сдачи кода, а мне больше не к кому обратиться(((

[eoln]

Вывод на экран таблицы: i, значение_слагаемого, сумма_ряда

uses graph, crt;
var
  x, e, slag: real;
  sum: array[0..255] of real;
  i: byte;
function fact(a: byte): longint;
begin
  if a > 1 then fact := a * fact(a - 1)
  else fact := 1
end;
begin
  write('x, e == '); readln(x, e);
  i := 0;
  sum[0] := 0;
  repeat
    inc(i);
    slag := exp((2*i-1)*ln(x)) / (fact(2*i+1)*(2*i-1));
    if i mod 2 = 0 then slag := -slag;
    if abs(slag) < e then break;
    sum[i] := sum[i-1] + slag;
    writeln(i:5, slag:15:8, sum[i]:15:8)
  until false;
  readln
end.

Затем добавляете графику. В массиве sum содержатся суммы, i-1 - количество слагаемых

[Horknee]

А что такое файл fraph.tpu? При выполнении кода он пишет, что этот файл не найден.

[eoln]

graph.tpu - модуль для работы с графикой, понадобится для отображения графика. В этом коде его можно пока убрать (и crt тоже)

[Horknee]

А почему когда я ввожу значения он пишетinvalid numeric format
я ввожу 1, 0,0001 в строчке x, e ==

[eoln]

По тому что надо
1 0.0001

[Horknee]

о_О спасибо большое, мне бы еще как то с графикм разобраться. Это по идее сложно?

[Horknee]

Помогите, пожалуйта, реализовать график...