Форум программистов, компьютерный форум, киберфорум
Наши страницы
PascalABC.NET
Войти
Регистрация
Восстановить пароль
 
Danpilsk
0 / 0 / 0
Регистрация: 11.10.2013
Сообщений: 18
#1

Вычислить значение ряда с точностью е = 0.001, найти абсолютную погрешность - PascalABC.NET

12.06.2014, 12:55. Просмотров 1244. Ответов 9
Метки нет (Все метки)

Используя данное представление (см. в таблице с вариантами) вычислить значение, соответствующее значению функции для указанного значения x0 (при указанных ограничениях на аргумент функции) с точностью e (например, e=0.001). Точность вычисления считается выполненной, если последний по модулю член в сумме меньше e. Полученное значение сравнить с истинным значением данной функции, найденное при помощи математических встроенных функций, найдя абсолютную погрешность вычисления. Указать количество просуммированных членов такого ряда.

Добавлено через 7 минут
Условие задачи

e^3x-2=e+3e*(x-1)+9e/2!*(x-1)^2…, |x|<∞
http://www.cyberforum.ru/pascalabc-net/thread1314247.html
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.06.2014, 12:55
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Вычислить значение ряда с точностью е = 0.001, найти абсолютную погрешность (PascalABC.NET):

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

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

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

Вычислить с точностью e=0.001
Даны действительные числа x и e (x &lt;&gt;0, e &gt; 0) . Вычислить с точностью e=0.001....

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

9
Puporev
Модератор
54132 / 41765 / 28875
Регистрация: 18.05.2008
Сообщений: 98,296
13.06.2014, 11:29 #2
Формула написана явно неверно, не говоря уже об оформлении.
Зачем там 2!, ведь это =2.
Приведите нормально формулу, либо используя редактор формул (ниже окна сообщений), либо приложите ее изображение.
0
Danpilsk
0 / 0 / 0
Регистрация: 11.10.2013
Сообщений: 18
13.06.2014, 12:35  [ТС] #3
Условие такое как и в методичке, если что-то еще потребуется пишите.
0
Миниатюры
Вычислить значение ряда с точностью е = 0.001, найти абсолютную погрешность  
Puporev
Модератор
54132 / 41765 / 28875
Регистрация: 18.05.2008
Сообщений: 98,296
13.06.2014, 12:41 #4
Значит в методичке опечатка, ибо 2! это идиотизм
0
Danpilsk
0 / 0 / 0
Регистрация: 11.10.2013
Сообщений: 18
13.06.2014, 12:47  [ТС] #5
Ну там именно факториал 2, в остальных вариантах задания, так же присутствует факториал.
0
Puporev
Модератор
54132 / 41765 / 28875
Регистрация: 18.05.2008
Сообщений: 98,296
13.06.2014, 12:48 #6
Имеет смысл выражение типа n! но никак не 2!
Да и чего мне с Вами спорить, это же Ваше задание.
1
Danpilsk
0 / 0 / 0
Регистрация: 11.10.2013
Сообщений: 18
13.06.2014, 12:51  [ТС] #7
Если вас не затруднит, представить её в виде формулки снизу, буду благодарен,
0
Изображения
 
Puporev
Модератор
54132 / 41765 / 28875
Регистрация: 18.05.2008
Сообщений: 98,296
13.06.2014, 12:58 #8
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var x,e,t,s:real;
    n:integer;
begin
write('x=');
readln(x);
write('e=');
readln(e);
n:=0;
t:=1;
s:=t;
while abs(t)>e do
 begin
  n:=n+1;
  t:=t*x/n;
  s:=s+t
 end;
write('s=',s:0:5);
end.
1
Danpilsk
0 / 0 / 0
Регистрация: 11.10.2013
Сообщений: 18
13.06.2014, 13:40  [ТС] #9
а как теперь мне это всё подогнать под моё условие задачи? у меня есть набросок кода, но что-то неправильно работает.


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
28
29
30
31
32
33
program lab_25_1;
var 
     x,e,t,s,f,delta:real;
     n:integer;
begin
  Writeln('введите значение x=');
  Readln(x);
  Writeln('введите точность вычисления e=');
  Readln(e);
  
  f:=exp(3*x-3);
  Writeln('истинное значение f(',x,')=',f:1:4);
  
  n:=0;
  t:=1;
  s:=t;
  
 
while abs(t)<e do
 begin
  t:=t*(exp(ln(3)*n)*e/n*exp(ln(x-1)*n));
  s:=s+t;
  n:=n+1;
 end;
 
  delta:=abs(f-s);
  
  Writeln('Значение по формуле: f(',x,') = ',s:1:4);
  Writeln('Погрешность вычисления = ', delta:1:4);
  Write('Количество просуммированных членов: ', n);
  readln;
 
end.
0
Puporev
Модератор
54132 / 41765 / 28875
Регистрация: 18.05.2008
Сообщений: 98,296
13.06.2014, 14:49 #10
Лучший ответ Сообщение было отмечено Danpilsk как решение

Решение

А с чего Вы взяли что показанная мне формула имеет какое-то отношение к Вашей бестолковой задаче?

Добавлено через 4 минуты
А, кажется дошло, просто ряд приведен короткий и нет общей формулы ряда.
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
program lab_25_1;
var  x,e,t,s,f,delta:real;
     n:integer;
begin
Writeln('введите значение x=');
Readln(x);
Writeln('введите точность вычисления e=');
Readln(e);
f:=exp(3*x-2);
Writeln('истинное значение f(',x,')=',f:0:4);
n:=0;
t:=exp(1);
s:=t;
while abs(t)>e do
 begin
  n:=n+1;
  t:=t*3*(x-1)/n;
  s:=s+t
 end;
delta:=abs(f-s);
Writeln('Значение по формуле: f(',x,') = ',s:1:4);
Writeln('Погрешность вычисления = ', delta:1:4);
Write('Количество просуммированных членов: ', n);
readln;
end.
1
13.06.2014, 14:49
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.06.2014, 14:49
Привет! Вот еще темы с решениями:

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

Вычислить сумму членов ряда с точностью до члена ряда, меньшей E
Вычислить сумму членов ряда: Z=x/(x+1)!+x^2/(x+2)!+x^3/(x+3)!+... с точностью...

Найти сумму ряда до члена ряда с заданным номером, и найти сумму ряда с заданной точностью
№1. Дано натуральное число n. Вычислить \sum_{i=1}^n\frac{1+i}{i!} ...

Вычислить сумму ряда с точностью e=10-5
Вычислить сумму ряда с точностью ε = 10-5 ...


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

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

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