Решение задачи Паскаль!

[ArtemK]

Y=(x+a)*(ARCTGx-(корень квадратный из)(x-a)(в третьей степени)+LN(x(в кубе)+1)
F=SINx+e(в степени -ax)+LN(|x+a+2)
a=2, b=0.5;
при x=4.5, x=1.5

[p51x]

Огласите размер вознаграждения

[ArtemK]

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

Огласите размер вознаграждения

Я не понимаю как решить!
Поэтому и прошу, чтобы решили или хотя бы эти формулы на Паскаль перевести.

[Вадим Мошев]

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

Я не понимаю как решить!
Поэтому и прошу, чтобы решили или хотя бы эти формулы на Паскаль перевести.

Вам будет и то и другое. Сколько вы готовы за это заплатить?

[ArtemK]

Сообщение от Вадим Мошев

Вам будет и то и другое. Сколько вы готовы за это заплатить?

С ума сошли?
Это форум, а не магазин!

[eoln]

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

С ума сошли?
Это форум, а не магазин!

Это форум программистов, а не авторешалка для ленивых студентов.
Показывай свои наработки (даже ужасно неправильные), а мы исправим/подскажем и всё это совершенно бесплатно и быстро.

[domovou]

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

Y=(x+a)*(ARCTGx-(корень квадратный из)(x-a)(в третьей степени)+LN(x(в кубе)+1)
F=SINx+e(в степени -ax)+LN(|x+a+2)
a=2, b=0.5;
при x=4.5, x=1.5

b я в примерах так и не увидел)))
Как то так:

uses crt;
var y,x,a,f,c:real;
begin
x:=4.5; a:=2;
y:=(x+a)*(Arctan(x)-sqrt((x-a)*(x-a)*(x-a))+Ln(x*x*x+1));
f:=Sin(x)-exp(ln(x)*((-a)*x))+Ln(Abs(x+a)+2);
writeln('F= ',y:0:3,' F= ',f:0:3);
end.

Возможно с экспонентой напартачил))

[ArtemK]

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

b я в примерах так и не увидел)))
Как то так:

uses crt;
var y,x,a,f,c:real;
begin
x:=4.5; a:=2;
y:=(x+a)*(Arctan(x)-sqrt((x-a)*(x-a)*(x-a))+Ln(x*x*x+1));
f:=Sin(x)-exp(ln(x)*((-a)*x))+Ln(Abs(x+a)+2);
writeln('F= ',y:0:3,' F= ',f:0:3);
end.

Возможно с экспонентой напартачил))

СПАСИБО!!!
У меня под корнем было всё неправильно записано, оказывается)
И ИКС В КУБЕ тоже не совсем так, из-за этого не запускалось. Спасибо!