Вычислить и вывести на экран в виде таблицы значения функции

@rallyloren · Регистрация: 12.01.2016

Author24 — интернет-сервис помощи студентам

Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда, на интервале от Х_НАЧ до Х_КОН с шагом dХ и точностью E. Таблицу снабдить заголовком и шапкой. Строка таблицы должна содержать значение аргумента, значение функции и количество просуммированных членов ряда.

$https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> \arccos (x)=\frac{\pi }2-\left(x+\sum_{n=1}^\infty \frac{1\cdot 3\cdot ...\cdot (2n-1)\cdot x^{2n+1}}{2\cdot 4\cdot ...\cdot 2n\cdot (2n+1)}\right)=\frac{\pi }2-\left(x+\frac{x^3}{2\cdot 3}+\frac{1\cdot 3\cdot x^5}{2\cdot 4\cdot 5}+\frac{1\cdot 3\cdot 5\cdot x^7}{2\cdot 4\cdot 6\cdot 7}+\frac{1\cdot 3\cdot 5\cdot 7\cdot x^9}{2\cdot 4\cdot 6\cdot 8\cdot 9}+...\right),\qquad |x|\,<\,1<br />$

Помогите решить задачу

@Puporev · 13.01.2016, 11:42

Pascal

uses crt;
function f(x:real):real;
begin
if x=0 then f:=pi/2
else if x>0 then f:=arctan(sqrt(1 - sqr(x))/x)
else f:=pi+arctan(sqrt(1 - sqr(x))/x);
end;
function s(x,eps:real;var n:integer):real;
var t,sm:real;
begin
n:=0;
t:=x;
sm:=x;
while abs(t)/(2*n+1)>eps do
 begin
  n:=n+1;
  t:=t*x*x*(2*n-1)/2/n;
  sm:=sm+t/(2*n+1);
 end;
s:=pi/2-sm;
end;
var xn,xk,h,x,e,y:real;
    n:integer;
begin
clrscr;
repeat
writeln('Vvedite nachalo i konec intervala xn,xk, -1<xn<xk<1');
readln(xn,xk);
until (xn>-1)and(xk>xn)and(xk<1);
repeat
writeln('vvedite shag tabulacii 0<h<',xk-xn:0:1,' h=');
readln(h);
until(h>0)and(h<xk-xn);
repeat
write('vvedite tochnost(0,1) e=');
readln(e);
until(e>0)and(e<1);
clrscr;
writeln('Tabulirovanie funkcii y=arccos(x)');
writeln('Na intervale [',xn:0:1,';',xk:0:1,'] s shagom ',h:0:1);
writeln('--------------------------------');
writeln('|  x  |    S    |    F    | n  |');
writeln('--------------------------------');
x:=xn;
while x<=xk+h/2 do
 begin
  y:=s(x,e,n);
  writeln('|',x:4:1,' |',y:8:4,' |',f(x):8:4,' |',n:3,' |');
  x:=x+h;
 end;
writeln('--------------------------------');
readln
end.

@rallyloren 0 / 0 / 0 Регистрация: 12.01.2016 Сообщений: 6
		1
	Вычислить и вывести на экран в виде таблицы значения функции 12.01.2016, 22:57. Показов 1212. Ответов 1 Метки нет (Все метки) Вычислить и вывести на экран в виде таблицы значения функции, заданной с помощью ряда, на интервале от Х_НАЧ до Х_КОН с шагом dХ и точностью E. Таблицу снабдить заголовком и шапкой. Строка таблицы должна содержать значение аргумента, значение функции и количество просуммированных членов ряда. $https://www.cyberforum.ru/cgi-bin/latex.cgi?<br /> \arccos (x)=\frac{\pi }2-\left(x+\sum_{n=1}^\infty \frac{1\cdot 3\cdot ...\cdot (2n-1)\cdot x^{2n+1}}{2\cdot 4\cdot ...\cdot 2n\cdot (2n+1)}\right)=\frac{\pi }2-\left(x+\frac{x^3}{2\cdot 3}+\frac{1\cdot 3\cdot x^5}{2\cdot 4\cdot 5}+\frac{1\cdot 3\cdot 5\cdot x^7}{2\cdot 4\cdot 6\cdot 7}+\frac{1\cdot 3\cdot 5\cdot 7\cdot x^9}{2\cdot 4\cdot 6\cdot 8\cdot 9}+...\right),\qquad \|x\|\,<\,1<br />$ Помогите решить задачу 0

	13.01.2016, 11:42

Вычислить и вывести на экран в виде таблицы значения функции

Решение