Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
4yDoNaPaCiK
0 / 0 / 0
Регистрация: 10.02.2014
Сообщений: 12
#1

суммирование членов бесконечного ряда - Turbo Pascal

11.02.2014, 15:34. Просмотров 284. Ответов 1
Метки нет (Все метки)

Задание выглядит так:
1. Выполнить суммирование членов бесконечного ряда до тех пор, пока последний
член ряда по абсолютной величине не будет меньше абсолютной точности
Δ=10-4...10-10 или пока не будет просуммировано заранее заданное число членов
бесконечного ряда.
2. Сравнить вычисленную сумму членов бесконечного ряда с образцовым
значением, полученным в виде константы или вычисленным по формуле.
формула:
http://www.cyberforum.ru/cgi-bin/latex.cgi?1/(1-x)=1+x+{x}^{2}+{x}^{3}+{x}^{4}+...; -1<x<+1
но, мне нужны 2 программы: чтоб первая считала по точности, а вторая по количеству( и с объяснениями, если можно, пожалуйста)
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
11.02.2014, 15:34
Здравствуйте! Я подобрал для вас темы с ответами на вопрос суммирование членов бесконечного ряда (Turbo Pascal):

Суммирование членов бесконечного ряда - Turbo Pascal
Дан пример: ar sh(x)=ln(x+sqrt(x^2+1))=x-x^3/6+3x^5/40-15x^7/378+105x^9/3456-..., -1&lt;x&lt;+1 Задание: 1. Выполнить суммирование членов...

суммирование членов бесконечного ряда - Turbo Pascal
Сделал прогу для случая, когда надо просуммировать заданное число членов ряда, но уверен, что есть ошибки. Подскажите, что надо...

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

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

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

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

1
Puporev
Модератор
53020 / 40831 / 14075
Регистрация: 18.05.2008
Сообщений: 94,978
11.02.2014, 15:58 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
uses crt;
var x,e,t,s:real;
begin
clrscr;
repeat
write('|x|<1 x=');
readln(x);
until abs(x)<1;
repeat
write('10^-10<=e<=10^-4 e=');
readln(e);
until(e>=10e-10)and(e<=10e-4);
t:=1;
s:=1;
while abs(t)>e do
 begin
  t:=t*x;
  s:=s+t
 end;
writeln('s=',s:0:10);
write('1/(1-x)=',1/(1-x):0:10);
readln
end.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
uses crt;
var x,t,s:real;
    n,i:integer;
begin
clrscr;
repeat
write('|x|<1 x=');
readln(x);
until abs(x)<1;
repeat
write('n>0 n=');
readln(n);
until n>0;
t:=1;
s:=1;
for i:=1 to n do
 begin
  t:=t*x;
  s:=s+t
 end;
writeln('s=',s:0:10);
write('1/(1-x)=',1/(1-x):0:10);
readln
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
11.02.2014, 15:58
Привет! Вот еще темы с ответами:

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

Выполнить суммирование членов бесконечного ряда - Turbo Pascal
Ребята выручайте пожалуста... Очень надо. Только пожалуста сделайте сразу с точностю...

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

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


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

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

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