Вычислить arcsinx=arctg x/корень из 1-x^2

@Arteezy · Регистрация: 10.07.2014

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

@Dmitriy_73 · 16.07.2014, 21:33

Pascal

var x:real;
function arcsin (y:real):real;
begin
arcsin:= arctan(y/sqrt(1-sqr(y)));
end;
begin
read(x);
if x=1 then write('1.570796326794897');
if x=-1 then write ('-1.570796326794897');
if 1-sqr(x)>0 then 
writeln (arcsin(x));
if 1-sqr(x)<0 then
writeln('error');
end.

@Arteezy 0 / 0 / 0 Регистрация: 10.07.2014 Сообщений: 10
		1
	Вычислить arcsinx=arctg x/корень из 1-x^2 14.07.2014, 09:48. Показов 2676. Ответов 1 Метки нет (Все метки) Вычислить arcsinx=arctg x/корень из 1-x^2 0

	16.07.2014, 21:33

Вычислить arcsinx=arctg x/корень из 1-x^2

Решение