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

Найти сумму ряда

06.01.2019, 19:09. Показов 1793. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Найти сумму ряда 1+1/4+...+1/n^2+... с точностью ε>0 , задаваемой пользователем .
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
06.01.2019, 19:09
Ответы с готовыми решениями:

Найти сумму ряда до члена ряда с заданным номером, и найти сумму ряда с заданной точностью
№1. Дано натуральное число n. Вычислить \sum_{i=1}^n\frac{1+i}{i!} №2. Вычислить формулу по заданию №1 с точностью до...

Посчитать сумму и найти количество членов ряда, которые вошли в сумму.
Посчитать сумму и найти количество членов ряда, которые вошли в сумму. (смысл заключается в том, что надо посчитать значение этой суммы)....

Найти сумму ряда
Найти сумму ряда чисел 1^3+2^3+3^3+...+n^3

3
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
06.01.2019, 21:47
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var e,s,t:real;
      n:integer;
begin
write('Введите точность 0<e<1 e=');
readln(e);
t:=1;
n:=1;
while t>e do
 begin
  n:=n+1;
  s:=s+t;
  t:=1/sqr(n);
 end;
write('s=',s:0:4)
end.
1
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,158
Записей в блоге: 1
08.01.2019, 09:27
Все бы хорошо, если б не слово «точность» в задании применительно к знакопостоянному ряду.
0
Модератор
10423 / 5711 / 3402
Регистрация: 17.08.2012
Сообщений: 17,368
12.01.2019, 02:41
Сумма этого ряда известна, и равна

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
\frac{\pi ^2}{6}\approx 1.644934066848226436472415166646<br />

Правильное решение:

Можно заменить в программе, которую написал Puporev, строку
Pascal
8
while 1/(k+1)>e do
либо применить предопределённый цикл:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  e, s, t: real;
  n, k: longint;
begin
  write('0 < eps < 1;  eps = ');
  readln(e);
  t := 1 / e - 1;
  k := trunc(t);
  if frac(t) <> 0 then inc(k);
  s := 1;
  for n := 2 to k do s := s + 1 / n / n;
  write('S = ', s:0:12);
  readln
end.
Если диалект паскаля поддерживает функцию ceil, то строки 7..9 можно заменить на
Pascal
7
  k := ceil(1 / e - 1);
и убрать переменную t из секции var.

Как было получено решение:

Определение критерия окончания вычислений
Проверка сходимости ряда (для справки)
Проверяем сходимость ряда по интегральному признаку Коши-Маклорена:

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
\int_{1}^{\infty }\frac{\operatorname{d}x}{x^2}=\left. -\frac{1}{x}\right|_{1}^{\infty }=-\lim _{x\rightarrow \infty}\frac{1}{x}+1=1<br />

Несобственный интеграл сходится, следовательно, ряд тоже сходится.

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

Оценка остатка ряда по признаку Коши-Маклорена:

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
\int_{k+1}^{\infty }\frac{\operatorname{d}x}{x^2}\leq r_k\leq \varepsilon<br />

Найдём интеграл:

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
\int_{k+1}^{\infty }\frac{\operatorname{d}x}{x^2}=\left. -\frac{1}{x}\right|_{1}^{\infty }=-\lim _{x\rightarrow \infty}\frac{1}{x}+\frac{1}{k+1}=\frac{1}{k+1}<br />

Тогда

https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
\frac{1}{k+1}\leq \epsilon \,\Leftrightarrow  \,k\geq \frac{1}{\varepsilon }-1<br />
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
12.01.2019, 02:41
Помогаю со студенческими работами здесь

Найти сумму ряда
найти сумму бесконечного ряда: *смотрите фото*

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

Найти сумму ряда
Помогите составить программу на языке паскаль Составить программу позволяющую вычислить сумму S=cosx+Cos2x/2!+....+cosnx/n! при трех...

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

найти сумму ряда
Найти сумму ряда : а) прямым суммированием; б) обратным суммированием; в) по схеме Горнера первых 50-100 членов ряда: 1. 1...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru