19 / 17 / 6
Регистрация: 09.01.2014
Сообщений: 351
1

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

25.10.2014, 15:21. Показов 1150. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Здравствуйте. Помогите найти ошибку.
Вычисление суммы ряда у меня производится верно, но когда пытаюсь воткнуть точность - программа работает, но пишет ерунду.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
program factorial;
var i,n,k,znak,F:longint;
        eps, S:real;
Begin
 write('n=');read(n);
 write('eps=');read(eps);
 s:=0;
 znak:=1;
 f:=1;
 repeat
 for i:=1 to n do
 if (i mod 2)<>0 then
 begin
  begin
   for k:=1 to i do f:=f*k;
   end;
 S:=S+znak/F;
 znak:=-znak;
 end;
 until (1/f)<eps;
 writeln(S:0:4);
 End.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.10.2014, 15:21
Ответы с готовыми решениями:

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

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

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

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

1
Почетный модератор
64299 / 47594 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
25.10.2014, 20:39 2
Привели бы формулу, а так
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var n:longint;
    eps,f,s:real;
begin
write('eps=');read(eps);
n:=0;
s:=0;
f:=1;//или f:=-1, нужна формула
repeat
n:=n+1;
f:=-f/n;
s:=s+f;
until abs(f)<eps;
write('S=',s:0:4);
end.
1
25.10.2014, 20:39
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.10.2014, 20:39
Помогаю со студенческими работами здесь

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

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

Вычисление суммы ряда с точностью e=10^-4
Уважаемые программисты, требуется ваша помощь. Нужно составить программу вычисления суммы ряда с...

Вычисление суммы ряда с заданной точностью
Требования к программе: 1) Записать расчетные формулы для вычисления слагаемого по рекуррентной...


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

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

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