Посчитать сумму указанного ряда в точке x с точностью ε

@Tom_Sawyer · Регистрация: 05.12.2009

Author24 — интернет-сервис помощи студентам

Люди. Помогите кто чем сможет. Надо через 2 дня сдавать прогу.

Вводятся координата x и точность ε. Посчитать сумму указанного ряда в точке x с точностью ε. Считается, что нужная точность достигнута, когда очередной член ряда по абсолютной величине становится меньше ε. Вывести три значения: посчитанную сумму, значение, посчитанное с помощью стандартных функций, и разницу между ними. Реализовано должно быть достаточно эффективно: степени, факториалы и т. п. не должны вычисляться заново для каждого члена ряда.
Сам ряд в отчёт можно не копировать (а как?:-) — достаточно указать вычисляемую
функцию. В прогонах следует использовать значения точности 0.001 и 0.000001.
Составить три варианта программы, в которых подсчёт суммы ряда соответственно
• находится в основной программе,
• оформлен в виде функции,
• оформлен в виде процедуры.
Все входные данные и результаты передаются в/из процедуру/функцию через параметры; глобальные переменные использовать нельзя.

P.S. типо три варианта надо сделать в виде программы модуля и функции.
P.S.S. по этой формуле надо всё выполнять.

@Aye Aye · 10.01.2010, 17:56

что то много ты хочешь, вот тебе функция остальное сам додумай

Pascal

program prg;
function fruc(x,eps:real):real;
var
   current,sum: real;
   n: integer;
begin
     sum:=0;
     current:=1;
     n:=0;
     while (abs(current) > eps) do begin
           sum:=sum+current;
           current:=-current*x*(2*n+1)/(2*(n+1));
           n:=n+1;
     end;
     fruc:=sum;
end;
var x:real;
begin
     write('Enter x < 1: ');
     readln(x);
     writeln(1/sqrt(1+x),'  ',fruc(x,0.000001));
     readln;
end.

@Tom_Sawyer 88 / 88 / 56 Регистрация: 05.12.2009 Сообщений: 134
		1
	Посчитать сумму указанного ряда в точке x с точностью ε 10.01.2010, 17:20. Показов 1794. Ответов 1 Метки нет (Все метки) Люди. Помогите кто чем сможет. Надо через 2 дня сдавать прогу. Вводятся координата x и точность ε. Посчитать сумму указанного ряда в точке x с точностью ε. Считается, что нужная точность достигнута, когда очередной член ряда по абсолютной величине становится меньше ε. Вывести три значения: посчитанную сумму, значение, посчитанное с помощью стандартных функций, и разницу между ними. Реализовано должно быть достаточно эффективно: степени, факториалы и т. п. не должны вычисляться заново для каждого члена ряда. Сам ряд в отчёт можно не копировать (а как?:-) — достаточно указать вычисляемую функцию. В прогонах следует использовать значения точности 0.001 и 0.000001. Составить три варианта программы, в которых подсчёт суммы ряда соответственно • находится в основной программе, • оформлен в виде функции, • оформлен в виде процедуры. Все входные данные и результаты передаются в/из процедуру/функцию через параметры; глобальные переменные использовать нельзя. P.S. типо три варианта надо сделать в виде программы модуля и функции. P.S.S. по этой формуле надо всё выполнять. Миниатюры 0

	10.01.2010, 17:56

Посчитать сумму указанного ряда в точке x с точностью ε

Решение