Цикл: вычисление суммы членов бесконечного ряда с точностью до члена ряда, меньшего ε

@k1ppper · Регистрация: 07.04.2015

Добрый вечер, помогите пожалуйста:

Составить программу для вычисления суммы членов бесконечного ряда с точностью до члена ряда, меньшего ε=0,001 при заданных значениях Х.

$https://www.cyberforum.ru/cgi-bin/latex.cgi?y=e^x=1+x+\frac{x^2}{2!}+\frac{x^3}{3!}+...$

При Х изменяющемся от –1 до 1 с шагом 1

@Samhain · 05.06.2015, 23:08

k1ppper,

Pascal

const e=0.001;
var s,si,x:real;
    i:integer;
begin
  x:=-1;
  repeat
    s:=0;si:=1;i:=0;
    repeat
      inc(i);
      s:=s+si;
      si:=x*si/i;
    until abs(si)<e;
    writeln('y = ',s:0:4,', exp(',x:0:1,') = ',exp(x):0:4);
    x:=x+1;
  until x>1;
  readln
end.

@k1ppper 0 / 0 / 0 Регистрация: 07.04.2015 Сообщений: 17
		1
	Цикл: вычисление суммы членов бесконечного ряда с точностью до члена ряда, меньшего ε 05.06.2015, 19:47. Показов 2810. Ответов 1 Метки нет (Все метки) Добрый вечер, помогите пожалуйста: Составить программу для вычисления суммы членов бесконечного ряда с точностью до члена ряда, меньшего ε=0,001 при заданных значениях Х. $https://www.cyberforum.ru/cgi-bin/latex.cgi?y=e^x=1+x+\frac{x^2}{2!}+\frac{x^3}{3!}+...$ При Х изменяющемся от –1 до 1 с шагом 1 0

Опции темы

Цикл: вычисление суммы членов бесконечного ряда с точностью до члена ряда, меньшего ε

Решение