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

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
svenchik
0 / 0 / 0
Регистрация: 19.11.2014
Сообщений: 2
#1

Вычислить сумму ряда с заданной точностью - Pascal

19.11.2014, 15:06. Просмотров 245. Ответов 1
Метки нет (Все метки)

Даны действительные числа x, ε (x не равно 0, ε>0). Вычислить с точностью ε

http://www.cyberforum.ru/cgi-bin/latex.cgi?\sum_{k=0}^{\infty}\frac{(-1)^kx^{4k+1}}{2k!(4k+1)}
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.11.2014, 15:06
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Вычислить сумму ряда с заданной точностью (Pascal):

Вычислить сумму ряда с заданной точностью - Pascal
Задали задачу по паскалю а я не могу решить((( помогите пожалуйста)))

Вычислить сумму ряда с заданной точностью - Pascal
составить программу вычисления суммы ряда с точностью до ϵ =10 в — 4 степени: ∞ 2ⁿ+5ᵏ ∑ ...

Вычислить сумму ряда с заданной точностью - Pascal
Укажите правильное направление, как решать задачу: Вычислить \sum_{l=1}^{\infty}\frac{\lg{lx}}{l!-l+x} при Х, равном 3.3 c точностью...

Вычислить сумму ряда с заданной точностью - Pascal
Помогите вычислить сумму ряда Добавлено через 2 минуты http://i006.***********/0912/5f/feaabca39e14.jpg вот задание, видать эту...

Вычислить сумму ряда с заданной точностью - Pascal
Помогите пожалуйста. Необходимо: вычислить сумму ряда при X= -0.35 с точностью ε=0.0001

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

1
JokeR.BY
CAPITAL OF ROCK!
1276 / 703 / 574
Регистрация: 03.03.2010
Сообщений: 2,284
Завершенные тесты: 2
19.11.2014, 15:50 #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
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
const
    line = '+-----+--------------------+---------------------+';
 
var
    eps : Single = 0;
    x : Single = 0;
    sum : Double = 0;
    fact : Double = 1;
    pow : Double;
    k : Word = 0;
    sumK : Double;
 
begin
    while (x = 0) do
    begin
        Write('Input x=');
        ReadLn(x);
    end;
    pow := x;
    sumK := x;
    while (eps <= 0) do
    begin
        Write('Input eps=');
        ReadLn(eps);
    end;
    WriteLn(line);
    WriteLn('|  k  |         si         |         sum         |');
    WriteLn(line);
    while (Abs(sumK) > eps) do //если без модуля, то каждый раз будет только две итерации
    begin
        sumK := pow / (fact * (4 * k + 1));
        sum := sum + sumK;
        Inc(k);
        fact := fact * (2 * k - 1) * (2 * k);
        pow := -pow * sqr(sqr(x));
        WriteLn('| ', k:3, ' | ', sumK:18:5, ' | ', sum:19:7, ' |');
    end;
    WriteLn(line);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.11.2014, 15:50
Привет! Вот еще темы с ответами:

Вычислить сумму ряда с заданной точностью - Pascal
Даны действительные числа (x не равен 0, e&gt;0) Вычислить с точностью e \sum_{k=1}^\infty \frac{(-1)^kx^k}{x^3+k^3}

Вычислить сумму ряда с заданной точностью - Pascal
1.1.46. l n(1-x)=-(x+x2/ 2 +x3/3 + …+ xn/n) для х&lt;1 вот собственно говоря программа. program Project1; {$APPTYPE CONSOLE} ...

Вычислить сумму ряда с заданной точностью - Pascal
Требуется помощь, заранее спасибо. Даны действительные числа x и ε (x≠0, ε&gt;0). Вычислить с точностью ε и указать количество учтённых...

Вычислить бесконечную сумму ряда с заданной точностью (е>0) - Pascal
Вычислить бесконечную сумму ряда с заданной точностью (е&gt;0). Простейшим способом \sum_{i=1}^{\infty}\frac{2}{i!}


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

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

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