ПОДСКАЖИТЕ ПОЖАЛУЙСТА,нужен оператор while-do.надо написать программу в паскале
Вычислить значение заданной функции непосредственно и как
сумму ряда с погрешностью 0.001. Значение аргумента выбрать самостоятельно
Приложения:
![](https://st.uroker.com/files/556/556541c14b43a0991101744f38aeec54.jpg)
Ответы
Ответ дал:
0
const e=0.001;
var x,a,a2,s:real; n:integer;
begin
write('x=');readln(x);
a:=x;
a2:=x*x;
s:=x;
n:=0;
while abs(a)>e do begin
n:=n+1;
a:=a*a2/(2*n)/(2*n+1);
s:=s+a;
end;
writeln('s = ',s:7:5);
writeln('f = ',sinh(x):7:5);
end.
Пример:
x=1.5
s = 2.12928
f = 2.12928
var x,a,a2,s:real; n:integer;
begin
write('x=');readln(x);
a:=x;
a2:=x*x;
s:=x;
n:=0;
while abs(a)>e do begin
n:=n+1;
a:=a*a2/(2*n)/(2*n+1);
s:=s+a;
end;
writeln('s = ',s:7:5);
writeln('f = ',sinh(x):7:5);
end.
Пример:
x=1.5
s = 2.12928
f = 2.12928
Ответ дал:
0
а почему значение гиперболического синуса равно сумме ряда? как это объяснить?
Ответ дал:
0
Посмотрите информацию о рядах Тейлора. "Ряд Те́йлора — разложение функции в бесконечную сумму степенных функций."
Вас заинтересует
1 год назад
2 года назад
2 года назад
8 лет назад
8 лет назад
8 лет назад