2 / 2 / 0
Регистрация: 01.12.2015
Сообщений: 8
1

Вычислить сумму членов ряда с точностью до члена ряда, меньшей E

01.12.2015, 03:22. Показов 5275. Ответов 2
Метки нет (Все метки)

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

Добавлено через 26 секунд
Помогите плиз
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.12.2015, 03:22
Ответы с готовыми решениями:

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

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

Вычислить сумму членов бесконечного ряда с заданной точностью
Вычислить сумму членов бесконечного ряда с заданной точностью: eps = 0,5*10^-4 при x = 0,10. ...

Вычислить сумму членов ряда от первого до члена с наименьшим номером, не превышающего то абсолютному значению 0,01.
Член ряда с номером n определяется выражением n/(n^3+n^2-3).Вычислить сумму членов ряда от первого...

2
694 / 568 / 414
Регистрация: 31.03.2013
Сообщений: 1,029
01.12.2015, 21:57 2
Лучший ответ Сообщение было отмечено TikiMikk как решение

Решение

TikiMikk,
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var s,si,x,e:real;
    i:integer;
begin
  write('x = ');readln(x);
  write('eps = ');readln(e);
  s:=0;si:=1;i:=1;
  repeat
    si:=x*si/(x+i);
    s:=s+si;
    inc(i);
  until abs(si)<e;
  write('s = ',s:0:10);
  readln
end.
0
Модератор
9356 / 4718 / 3173
Регистрация: 17.08.2012
Сообщений: 14,814
05.12.2015, 23:43 3
Samhain, неверно.

Во-первых, Вас сбила с толку латинская литера "x". В данном ряде переменная x должна быть ни в коем случае не действительной, а целой, и не меньшей, чем -1, поскольку факториал от действительного числа либо от целого отрицательного числа не определён.

Во-вторых (а, скорее, как следствие из "во-первых"), неверно найден первый член последовательности.

Также не предусмотрели проверку на допустимость входных аргументов. Просто табу, вообще-то, недостаточно. За ошибку можно не считать, но всё же лучше, если программа достойно выдерживает общение с самым привередливым преподавателем.
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
34
35
var s, si, e: double;
    i, x: longint;
begin
  repeat
    write('Integer x >= -1;  x = ');
    readln(x)
  until x >= -1;
  if x = 0
    then s := 0
    else begin
      repeat
        write('Real eps > 0;   eps = ');
        readln(e)
      until e > 0;
      if x = -1
        then begin
          si := x;
          s := si;
          i := 2
        end
        else begin
          si := 1;
          for i := 2 to x do si := si / i;
          s := 0;
          i := 1
        end;
      repeat
        si := x / (x + i) * si;
        s := s + si;
        inc(i)
      until abs(si) < e
    end;
  write('s = ', s);
  readln
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.12.2015, 23:43
Помогаю со студенческими работами здесь

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

Вычисление суммы членов ряда с точностью до члена ряда, меньшего ε
Составить программу для вычисления суммы членов ряда с точностью до члена ряда, меньшего ε( по...

Вычислить сумму членов ряда с точностью E
Вычислить сумму членов ряда с точностью E. s=1+x/1!+x^2/2!+x^3/3!+... Помогите, пожалуйста,...

По заданному целому числу n вычислить сумму всех членов ряда до n-го члена включительно
1. По заданному целому числу n вычислить сумму всех членов ряда до n-го члена включительно: 1 +...


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

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

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