Вычислить значение выражения

@Буравлев Артем · Регистрация: 28.09.2010

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

помогите записать формулу на языке паскаля
0,4*(-2*cos(0,4*x+0,4)^(-3)*(-sin(0,4*x+0,4)*0,4))-2

@Puporev · 14.10.2010, 11:55

Вот здесь непонятно
cos(0,4*x+0,4)^(-3)
Это (cos(0,4*x+0,4))^(-3)
или cos((0,4*x+0,4)^(-3))?
т.е. выражение под косинусом в степени, или косинус в степени?

@Буравлев Артем · 14.10.2010, 11:57 **[ТС]**

Сообщение от Puporev

Вот здесь непонятно
cos(0,4*x+0,4)^(-3)
Это (cos(0,4*x+0,4))^(-3)
или cos((0,4*x+0,4)^(-3))?
т.е. выражение под косинусом в степени, или косинус в степени?

это косинус в степени -3

@Puporev · 14.10.2010, 12:04

Если правильно расшифровал, то так.

Pascal

t:=0.4*x+0.4;
if t>0 then y:=-0.8*exp(-ln(t)*3)*(-sin(t))-2
else if t=0 then y:=-2
else y:=0.8*exp(-ln(abs(t))*3)*(-sin(t))-2;

@guabreva · 14.10.2010, 12:06

Сообщение от Буравлев Артем

помогите записать формулу на языке паскаля
0,4*(-2*cos(0,4*x+0,4)^(-3)*(-sin(0,4*x+0,4)*0,4))-2

В принципе ты ее уже расписал. Если память не изменяет, то :
1. я тебя понял так...
для простоты распишем
a:=(-2*cos(0.4*x+0.4)exp(-3);
b:=(-sin(0.4*x+0.4)*0.4);

res:=((0.4*a)*b)-2;

По моему так. )

@Буравлев Артем · 14.10.2010, 12:07 **[ТС]**

Сообщение от Puporev

Если правильно расшифровал, то так.

Pascal

t:=0.4*x+0.4;
if t>0 then y:=-0.8*exp(-ln(t)*3)*(-sin(t))-2
else if t=0 then y:=-2
else y:=0.8*exp(-ln(abs(t))*3)*(-sin(t))-2;

это вот что. здесь все расписано как нужно мне
f(x)=tg(0,4*x+0,4)-x^2=0
y=tg(0,4*x+0,4)
y1=x^2
f'(x)=(0,4/(cos(0,4*x+0,4)^2))-2*x
f''(x)=0,4*(-2*cos(0,4*x+0,4)^(-3)*(-sin(0,4*x+0,4)*0,4))-2

я все расписал вот только вторую производную не могу

@Puporev · 14.10.2010, 12:10

Сразу меняй повторяющиеся выражения на переменную, легче считать компьютеру, проще писать тебе

t:=0.4*x+0.4;

@Буравлев Артем · 14.10.2010, 12:12 **[ТС]**

Сообщение от Буравлев Артем

y:=-0.8*exp(-ln(t)*3)*(-sin(t))-2

а почему вместо cos вы написали -ln ?

@Puporev · 14.10.2010, 12:18

Да заклинило, видимо в мозгу принял t=cos(0.4x+0.4) нужно

Pascal

t:=0.4*x+0.4;
if cos(t)>0 then y:=-0.8*exp(-ln(cos(t))*3)*(-sin(t))-2
else if cos(t)=0 then y:=-2
else y:=0.8*exp(-ln(abs(cos(t)))*3)*(-sin(t))-2;

@Буравлев Артем · 14.10.2010, 12:22 **[ТС]**

большое спасибо

@Puporev · 14.10.2010, 12:27

Кстати, если у тебя тангенс, то cos(t)=0 сразу нужно исключить.

@Буравлев Артем 1 / 1 / 1 Регистрация: 28.09.2010 Сообщений: 49
		1
	Вычислить значение выражения 14.10.2010, 10:36. Показов 4733. Ответов 10 Метки нет (Все метки) помогите записать формулу на языке паскаля 0,4(-2cos(0,4x+0,4)^(-3)(-sin(0,4x+0,4)0,4))-2 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	14.10.2010, 11:55	2
	Вот здесь непонятно cos(0,4x+0,4)^(-3) Это (cos(0,4x+0,4))^(-3) или cos((0,4*x+0,4)^(-3))? т.е. выражение под косинусом в степени, или косинус в степени? 1

@Буравлев Артем 1 / 1 / 1 Регистрация: 28.09.2010 Сообщений: 49
	14.10.2010, 11:57 [ТС]	3
	Сообщение от Puporev Вот здесь непонятно cos(0,4x+0,4)^(-3) Это (cos(0,4x+0,4))^(-3) или cos((0,4*x+0,4)^(-3))? т.е. выражение под косинусом в степени, или косинус в степени? это косинус в степени -3 0

@guabreva 37 / 36 / 5 Регистрация: 05.11.2009 Сообщений: 251
	14.10.2010, 12:06	5
	Сообщение от Буравлев Артем помогите записать формулу на языке паскаля 0,4(-2cos(0,4x+0,4)^(-3)(-sin(0,4x+0,4)0,4))-2 В принципе ты ее уже расписал. Если память не изменяет, то : 1. я тебя понял так... для простоты распишем a:=(-2cos(0.4x+0.4)exp(-3); b:=(-sin(0.4x+0.4)0.4); res:=((0.4a)b)-2; По моему так. ) 1

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	14.10.2010, 12:10	7
	Сразу меняй повторяющиеся выражения на переменную, легче считать компьютеру, проще писать тебе t:=0.4*x+0.4; 1

@Буравлев Артем 1 / 1 / 1 Регистрация: 28.09.2010 Сообщений: 49
	14.10.2010, 12:12 [ТС]	8
	Сообщение от Буравлев Артем y:=-0.8exp(-ln(t)3)*(-sin(t))-2 а почему вместо cos вы написали -ln ? 0

@Буравлев Артем 1 / 1 / 1 Регистрация: 28.09.2010 Сообщений: 49
	14.10.2010, 12:22 [ТС]	10
	большое спасибо 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	14.10.2010, 12:27	11
	Кстати, если у тебя тангенс, то cos(t)=0 сразу нужно исключить. 0