Вычислить суму ряда - Pascal ABC

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 5.00/3:

@Misha123 0 / 0 / 0 Регистрация: 04.12.2011 Сообщений: 40

	Вычислить суму ряда 09.11.2018, 10:14. Показов 520. Ответов 1 Метки нет (Все метки) 4. Вычислить: cos(x)+cos(cos(x))+... +cos(...cos(x)) (n cлагаемых). 0

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

09.11.2018, 10:14

Ответы с готовыми решениями:

Вычислить суму ряда с точностью епсилон
Условие в фото. Вариант 2 S=\frac{sin2x}{1*3}+\frac{2sin4x}{3*5}+\frac{3sin6x}{5*7}+... для х=0,8; \varepsilon ={10}^{-2}

Вычислить суму ряда с точностью епсилон с использованием оператора с постусловием repeat - until
S=\frac{sin2x}{1*3}+\frac{2sin4x}{3*5}+\frac{3sin6x}{5*7}+... для х=0,8; \varepsilon ={10}^{-2}

Найти суму суму всех натуральных чисел кратных 13 от 13 до 169
2). Найти суму суму всех натуральных чисел кратных 13 от 13 до 169. Заранее здоровенное спасЫба :)

Puporev

Почетный модератор

64315 / 47611 / 32743

Регистрация: 18.05.2008

Сообщений: 115,167

09.11.2018, 10:45

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var n,i:integer;
    x,s:real;
begin
write('x=');
readln(x);
write('n=');
readln(n);
s:=0;
for i:=1 to n do
 begin
  x:=cos(x);
  s:=s+x;
 end;
write('S=',s:0:3)
end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

09.11.2018, 10:45

Помогаю со студенческими работами здесь

Найти суму ряда
Помогите написать задачу.

Найти приближенно суму и произведение бесконечного ряда
S= 1 + (х в 2степени)/2! + (х в 4степени)/4! +...+ )х в степени 2n)/ (2*n)! ..+....

Найти суму тех членов ряда, модуль которых больше или равен заданному Е
Дан числовой ряд и некоторое число Е. Найти суму тех членов ряда, модуль которых больше или равен заданному Е. Общий член ряда имеет вид в...

Найти суму тех членов ряда, модуль которых больше или равен заданому Е
Дан числовой ряд и некоторое число Е. Найти суму тех членов ряда, модуль которых больше или равен заданному Е. -массивы при решении не...

Вычислить суму ряда
Помогите вычислить суму ряда. S=1*2+2*3*4+...+n*(n+1)*...*2n, n є N

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Вывод данных через динамический список в справочнике Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .	Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). 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. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .

Наверх