Создание программы вычисления бесконечных рядов на языке Delphi

[imaxx_]

CdxZPfRjA-4.jpg

[digitalis]

А сам что написал? Выкладывай, не стесняйся - в случае чего подкорректируем.
Даю подсказку: использовать while или repeat. For тоже годится.
http://thedelphi.ru/les/les4.php

[ViktorR]

Для начала скачай книжку Т.А. Павловская, Программирование на ЯВУ, Паскаль. Там есть пример того, как решать подобные задачи.
Разберёшься, там эта тема расписана аккуратно и внятно.

PS: Книга лежала в разделе Паскаль, ... в литературе.

[newerow1989]

const e=2.5e-5;
var x,y,y1:real;
    n:integer;
begin
   Write('|x| < 1 = '); Readln(x);
   n:=1;
   y1:=x;
   y:=x;
   Repeat
      Inc(n);
      y1:=-y1*x/n;
      y:=y+y1
   Until Abs(y1)<e;
   Writeln(y:0:8);
   Readln;
end.

[digitalis]

Хорошо, что есть Неверов: двоечник скопипастил из форума - и кондец. Это даже лучше, чем Павловская.
Кстати, и неправильно. В знаменателе будет не i, а i! . А кошерно будет так:

     y1:=-y1*x;
      y:=y+y1/n;

Хотя возможно, ошибка в самой задаче, и факториал не нарисовался. А без него ряд будет очень дооолго сходиться, особенно при х, близком к 1.