Вычислить значение суммы бесконечного ряда с заданной точностью E. Вывести значение суммы и число членов ряда

@Vold8m · Регистрация: 29.04.2020

1. Вычислить значение суммы бесконечного ряда с заданной точ-
ностью . Вывести значение суммы и число членов ряда, вошедших в
сумму.
2. Составить алгоритм и программу в соответствии с вариантом.
3. Отладить составленную программу.
X=3
Точность E=0,0001
Точное значение: $https://www.cyberforum.ru/cgi-bin/latex.cgi?cos(\frac{x}{3})$
Сумма членов ряда: $https://www.cyberforum.ru/cgi-bin/latex.cgi?1-(\frac{x}{3})^2 \frac{1}{2!}+(\frac{x}{3})^4 \frac{1}{4!}-(\frac{x}{3})^6 \frac{1}{6!}+...+({-1})^{n+2} ({\frac{x}{3})^{2n} \frac{1}{2n!}+...$

@Puporev · 24.05.2020, 19:30

Pascal

const e=0.0001;
var x,y,t,s:real;
    n:integer;
begin
x:=3;
y:=x/3;
n:=0;
t:=1;
s:=t;
while abs(t)>e do
 begin
  n:=n+1;
  t:=-t*y*y/(2*n-1)/(2*n);
  s:=s+t;
 end;
writeln('S=',s:0:4);
writeln('cos(x/3)=',cos(y):0:4);
end.

@Vold8m 0 / 0 / 0 Регистрация: 29.04.2020 Сообщений: 11
		1
	Вычислить значение суммы бесконечного ряда с заданной точностью E. Вывести значение суммы и число членов ряда 24.05.2020, 19:18. Просмотров 854. Ответов 1 Метки pascal, pascal abc, pascal abc net, pascal abc python, pascal abc.net. (Все метки) 1. Вычислить значение суммы бесконечного ряда с заданной точ- ностью . Вывести значение суммы и число членов ряда, вошедших в сумму. 2. Составить алгоритм и программу в соответствии с вариантом. 3. Отладить составленную программу. X=3 Точность E=0,0001 Точное значение: $https://www.cyberforum.ru/cgi-bin/latex.cgi?cos(\frac{x}{3})$ Сумма членов ряда: $https://www.cyberforum.ru/cgi-bin/latex.cgi?1-(\frac{x}{3})^2 \frac{1}{2!}+(\frac{x}{3})^4 \frac{1}{4!}-(\frac{x}{3})^6 \frac{1}{6!}+...+({-1})^{n+2} ({\frac{x}{3})^{2n} \frac{1}{2n!}+...$ 0

Опции темы

Вычислить значение суммы бесконечного ряда с заданной точностью E. Вывести значение суммы и число членов ряда

Решение