Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.82/11: Рейтинг темы: голосов - 11, средняя оценка - 4.82
0 / 0 / 0
Регистрация: 25.02.2013
Сообщений: 4
1

Вычисления суммы ряда с точностью до члена ряда, не превышающего по абсолютной величине 0,001

28.02.2013, 21:52. Просмотров 2254. Ответов 1
Метки нет (Все метки)


Помогите пожалуйста с решением задачи, заранее спасибо!!!

Составьте программу (на алгоритмическом языке Паскаль) для вычисления суммы ряда S = -1+ 1/2 + 3/4 + … + (2n-1)/2^n (n=0,1,2,....) с точностью до члена ряда, не превышающего по абсолютной величине 0,001.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.02.2013, 21:52
Ответы с готовыми решениями:

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

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

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

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

1
107 / 107 / 110
Регистрация: 28.02.2011
Сообщений: 978
28.02.2013, 23:30 2
Лучший ответ Сообщение было отмечено magvaer1 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
const E=0.001;
 var S,c:real;
     n:integer;
Function Pow(x,n:real):real;
begin
If n=0 then begin Pow:=1;end else
if x=0 then begin Pow:=0;end else
Pow:= exp(N * ln(X));
end;
 
begin
 s:=0;
 n:=0;
 repeat
  c:=(2*n-1)/pow(2,n);
  S:=s+c;
  inc(n);
  until abs(c)<e;
writeln(s:1:4);
readln;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.02.2013, 23:30

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

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

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

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

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

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

По заданной формуле (k+1)²+3)/k члена ряда с номером k составить программу вычисления суммы всех членов ряда
По заданной формуле ((k+1)²+3)/k члена ряда с номером k составить программу вычисления суммы всех...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.