Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
pascal9812
0 / 0 / 0
Регистрация: 11.10.2017
Сообщений: 18
1

Вычислить приближенное значение суммы бесконечного ряда

19.10.2017, 15:33. Просмотров 238. Ответов 7
Метки нет (Все метки)

Вычислить приближенное значение суммы бесконечного ряда , до тех пор , пока очередное слагаемое не станет <E (наименьшее число).Для решения данной задачи воспользуйтесь операторами Repeat или While , найти формулу i-члена ряда (последовательности), проверить его на условие <E

вот пример
1-(1/3)+(1/5)-(1/7)+...
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.10.2017, 15:33
Ответы с готовыми решениями:

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

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

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

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

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

7
Puporev
Модератор
54584 / 42090 / 29061
Регистрация: 18.05.2008
Сообщений: 99,289
19.10.2017, 16:19 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var i:integer;
    e,s:real;
begin
i:=1;
s:=1;
e:=0.00001;
while abs(1/(2*i-1))>e do
 begin
  i:=i+1;
  if odd(i) then  s:=s+1/(2*i-1)
  else s:=s-1/(2*i-1)
 end;
write('s=',s:0:5)
end.
0
pascal9812
0 / 0 / 0
Регистрация: 11.10.2017
Сообщений: 18
19.10.2017, 18:44  [ТС] 3
exitcode = 201 Free Pascal что делать?

Добавлено через 1 минуту
компиляция успешна , а вот запуск exitode 201
0
Puporev
Модератор
54584 / 42090 / 29061
Регистрация: 18.05.2008
Сообщений: 99,289
19.10.2017, 18:52 4
Уменьшите точность
Pascal
1
e:=0.0001;
0
pascal9812
0 / 0 / 0
Регистрация: 11.10.2017
Сообщений: 18
19.10.2017, 18:57  [ТС] 5
уменьшил теперь как сказать, командная строка быстро открывается и закрывается.
0
pascal9812
0 / 0 / 0
Регистрация: 11.10.2017
Сообщений: 18
19.10.2017, 19:00  [ТС] 6
вот скрин
0
Миниатюры
Вычислить приближенное  значение суммы бесконечного ряда  
pascal9812
0 / 0 / 0
Регистрация: 11.10.2017
Сообщений: 18
19.10.2017, 19:02  [ТС] 7
вот скрин 2
0
Миниатюры
Вычислить приближенное  значение суммы бесконечного ряда  
Puporev
Модератор
54584 / 42090 / 29061
Регистрация: 18.05.2008
Сообщений: 99,289
19.10.2017, 19:03 8
Цитата Сообщение от pascal9812 Посмотреть сообщение
командная строка быстро открывается и закрывается
Так Вам же влом было создать тему в разделе Free Pascal, а я не телепат.
Вставьте перед последним end.
Pascal
1
readln
Или нажимайте Alt+F5.
0
19.10.2017, 19:03
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.10.2017, 19:03

Определить значение суммы членов бесконечного ряда
Помогите пожалуйста сделать 1.Даны x1, …, x7; L1, …, L5; a, b. Определить ...

Вычислить приближенное значение бесконечной суммы
Совсем не сталкивалась с такими задачами, может кто-то помочь решить? ...

Вычислить приближенное значение бесконечной суммы с точностью e
Задание гласит: Вычислить приближенное значение бесконечной суммы с точностью...


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

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

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