Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
Mikael_Akopyan
0 / 0 / 0
Регистрация: 06.04.2013
Сообщений: 15
1

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

08.04.2013, 11:31. Просмотров 842. Ответов 1
Метки нет (Все метки)

1. Выполнить суммирование членов бесконечного ряда до тех пор, пока последний
член ряда по абсолютной величине не будет меньше абсолютной точности 10^-4..10^-10 или пока не будет просуммировано заранее заданное число членов
бесконечного ряда.
2. Сравнить вычисленную сумму членов бесконечного ряда с образцовым
значением, полученным в виде константы или вычисленным по формуле.
0
Миниатюры
Выполнить суммирование членов бесконечного ряда  
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.04.2013, 11:31
Ответы с готовыми решениями:

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

Выполнить суммирование членов бесконечного ряда
Пожалуйста помогите с задачей, не могу понять как её можно вписать в паскале! Вот условия 1....

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

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

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

1
Puporev
Модератор
55062 / 42329 / 29230
Регистрация: 18.05.2008
Сообщений: 100,026
08.04.2013, 12:29 2
Лучший ответ Сообщение было отмечено Mikael_Akopyan как решение

Решение

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
25
26
27
uses crt;
var x,e,t,s:real;
    n,k:integer;
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);
k:=round(ln(1/e)/ln(10));{кол зн после запятой}
n:=0;
t:=1;
s:=t;
while abs(t)>e do
 begin
  n:=n+1;
  t:=t*x*x*(2*n-1)/(2*n);
  s:=s+t
 end;
writeln('S=',s:0:k);
write('1/sqrt(1-x^2)=',1/sqrt(1-x*x):0:k);
readln
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.04.2013, 12:29

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

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

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


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

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

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