Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/18: Рейтинг темы: голосов - 18, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 09.10.2008
Сообщений: 13

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

09.10.2008, 12:10. Показов 3604. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Пользуясь рекурентной формулой вычислить сумму членов бесконечного ряда с заданной точностью e, |x|<1

https://www.cyberforum.ru/cgi-bin/latex.cgi?S=\sum_{i=1}^{\infty}\left(-1 \right)^{n-1}\,\cdot\,\frac{2n-1}{\left(2n \right)!}\,\cdot\, x^{2n}
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
09.10.2008, 12:10
Ответы с готовыми решениями:

Вычислить сумму членов бесконечного ряда с заданной точностью
Вычислить сумму членов бесконечного ряда с заданной точностью: eps = 0,5*10^-4 при x = 0,10. На экран вывести значение суммы,...

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

Вычислить значение суммы членов бесконечного ряда с заданной точностью
Вычислить значение суммы членов бесконечного ряда с заданной точностью: S=1+\frac{\cos(\pi /4)}{1!}x+...+\frac{\cos(n\pi...

2
3 / 3 / 1
Регистрация: 08.10.2008
Сообщений: 37
09.10.2008, 22:17
Лучший ответ Сообщение было отмечено servif как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program Linux_forever;
 
const e:real = 1e-6;  {Выбираем любую точность}
const x:real = 0.512; {Выбираем x: |x|<1}
 
function sum(i:integer):real;
var j:integer;
    factor:real;
begin
        factor := 1;
        for j := 1 to 2*i do
                factor := factor * x / j;
        factor := factor * (2*i-1);
        if (i - 1) mod 2 = 1 then
                factor := (-1) * factor;
        if abs(factor) < e then
                sum := factor
        else
                sum := factor + sum(i + 1);
end;
 
begin
        writeln('S=', sum(1):0:6);
end.
1
0 / 0 / 0
Регистрация: 09.10.2008
Сообщений: 13
10.10.2008, 08:59  [ТС]
Большое спасибо, правда нужно было не с помощью функции, а непосредственно рекурентным выражением.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
10.10.2008, 08:59
Помогаю со студенческими работами здесь

Найти ошибку. Определение с заданной точностью суммы членов бесконечного числового ряда
Помогите найти ошибку. Нужно определить с заданной точностью (epsilon) суму членов бесконечного числового ряда. ...

Найти сумму данного бесконечного ряда с заданной точностью
Найти сумму данного бесконечного ряда с заданной точностью , т.е. продолжать процесс суммирования до тех пор, пока модуль разности между...

Вычислить сумму членов бесконечного ряда
S=x-x^3/3+....(-1)^n*x^2n-1/2n-1+....(/- дробь) Значение 0.10 Точность 0.5*10^-4 Вычислить суммы членов бесконечного ряда с заданной...

Вычислить сумму бесконечного ряда с точностью е
Знаю что похожих тем полно но не нашел решения на мою формулу, и вообще как это решается. Формула: \sum_{i=0}^\infty...

Вычислить сумму членов бесконечного ряда с заданной точностью
Недавно только в этой сфере. Нашел у вас на форуме что то типа моей задачи, но что то не так. Помогите, пожалуйста. Номер 2. program...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Идея фильтра интернета (сервер = слой+фильтр).
Hrethgir 31.03.2026
Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .
Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда
anaschu 31.03.2026
В прикрепленном документе раздумья о том, как можно поменять модель в будущем
10 пpимет, которые всегда сбываются
Maks 31.03.2026
1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .
Перемещение выделенных строк ТЧ из одного документа в другой
Maks 31.03.2026
Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave
DevAlt 30.03.2026
Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .
Автоматическое создание документа при проведении другого документа
Maks 29.03.2026
Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений
Maks 29.03.2026
Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru