0 / 0 / 0
Регистрация: 24.11.2017
Сообщений: 9
1

Вычислить сумму ряда с точностью до члена ряда, меньшего заданной точности

24.11.2017, 12:26. Показов 3731. Ответов 4
Метки нет (Все метки)

Вычислить сумму членов для следующих рядов с точностью до члена ряда, меньшего Е (заданная точность):

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
1+3x^2+...+\frac{2n+1}{n!}\cdot x^{2n},\ \ \ E=0.002;\ \ x=0.118<br />

Помогите, пожалуйста, составить программу в Pascal. Заранее, благодарю.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.11.2017, 12:26
Ответы с готовыми решениями:

Найти сумму ряда S с точностью до члена ряда, по абсолютной величине меньшего eps
найти сумму ряда S с точностью до члена ряда, по абсолютной величине меньшего eps = 0.0001. в чем...

Вычисление суммы членов бесконечного ряда с точностью до члена ряда, меньшего ε
Доброе утро, форум. Если кому не сложно, то помогите с программой, вернее найти ошибку в ней Само...

Вычислить сумму членов ряда с точностью до члена ряда
Помогите выполнить задание. Вычислить сумму членов для следующих рядов с точностью до члена ряда,...

Вычислить сумму членов ряда с точностью до члена ряда
Пожалуйста помогите выполнить задание. Вычислить сумму членов для следующих рядов с точностью до...

4
Почетный модератор
64253 / 47553 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
24.11.2017, 16:20 2
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var x,e,t,s:real;
    n:integer;
begin
x:=0.118;
e:=0.002;
n:=1;
t:=1;
s:=t;
while t*(2*n+1)>e do
 begin
  n:=n+1;
  t:=t*x*x/n;
  s:=s+t*(2*n+1);
 end;
writeln('S=',s:0:3);
end.
0
0 / 0 / 0
Регистрация: 24.11.2017
Сообщений: 9
24.11.2017, 17:30  [ТС] 3
А где 1+3х^2? и тут указано х^2/n хотя в задании нет. Что - то совсем не понятно....
0
Почетный модератор
64253 / 47553 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
24.11.2017, 17:42 4
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
n:=1;
t:=1;//первый член ряда
s:=t;
while t*(2*n+1)>e do
 begin
  n:=n+1;
  t:=t*x*x/n;//умножаем предыдущий на x^2 и делим на очередной номер, получаем x[SUP]2n[/SUP]/n!
                  //это называется  рекуррентное соотношение
  s:=s+t*(2*n+1);//умножаем на очередное нечетное число и прибавляем к сумме.
 end;
writeln('S=',s:0:3);
end.
0
0 / 0 / 0
Регистрация: 24.11.2017
Сообщений: 9
25.11.2017, 11:58  [ТС] 5
спасибо большое
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.11.2017, 11:58
Помогаю со студенческими работами здесь

Вычислить сумму ряда с заданной степенью точности
Вычислить сумму ряда с заданной степенью точности a

Вычислить сумму ряда с заданной степенью точности
Здравствуйте, если нетрудно помогите решить задачу: Вычислить сумму ряда с заданной степенью...

Вычислить сумму ряда с заданной степенью точности a
1. Вычислить сумму ряда с заданной степенью точности a:

Вычислить сумму ряда с заданной степенью точности a
Помогите решить задачу) Буду благодарен Вычислить сумму ряда с заданной степенью точности a:...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru