Для x, изменяющегося в интервале от x0 до xk с шагом h, вычислить значения беско...

bog2012 @bog2012

August 2022 1 35 Report

Для x, изменяющегося в интервале от x0 до xk с шагом h, вычислить значения бесконечной суммы S(x) с точностью E=0.00001 и функции y(x) Написать программу в Delphi7 18 номер

Answers & Comments

Aillianna

Verified answer

//PascalABC.Net 3.1 сборка 1200
var
    x0, xk, dx, e, x, a, s: real;
    i: integer;

begin
    write('Введите промежуток и шаг ([a,b] h) и точность Е ');
    readln(x0, xk, dx, e);

    x := x0;
    writeln(' i ':3, ' | ', ' x ':10, ' | ', ' s ':10, ' | ', ' y(x) ':10);
    repeat
        a := 1;
        s := a;
        i := 0;

        repeat
            i := i + 1;
            a := a * (-1) * 2 * x / (2 * i) / (2 * i - 1);
            s := s + a;
        until abs(a) < e;

        writeln(i:3, ' | ', x:10:3, ' | ', s:10:3, ' | ', (cos(sqrt(2 * x))):10:3);
        x := x + dx;
    until x >= xk;
end.

2 votes Thanks 0

dlya x izmenyayushegosya v intervale ot x0 do xk s shagom h vychislit znacheniya besko38f381ae01493e22156036ea933ae4ba 79097

Answer

bog2012 August 2022 | 0 Ответы

Answers & Comments

Verified answer

dlya x izmenyayushegosya v intervale ot x0 do xk s shagom h vychislit znacheniya besko38f381ae01493e22156036ea933ae4ba 79097

pomogite sostavit programme v 18 nomere v delphi7

pomogite s 18 nomerom17a8fe4ade3146a5ec3c33a310e3585b 41062

18 dany razlichnye dejstvitelnye chisla x y z d najti max min x y min

najti znacheniya f dlya x izmenyayushegosya v intervale ot x0 do xk s shagom h znacheni

ab napisat programmu v delphi7

v massive iz 10 celyh chisel podschitat kolichestvo elementov menshe chem srednee a

dany dva vektora b b1 b2 bn x x1x2 xn i matrica anxn n

opishite vneshnost kakoj nibud devushki aktrisy eyo cherty lica

x2 36gt0 v otvete ukazhite summu naibolshego celogo otricatelnogo resheniya

рекомендуемые вопросы

Helpful Links

Helpful Social