Помогите с паскаль

[Vladislav125]

Вот код:
Y:=a*power(x,5)*(arctan(a+x)-(sqr(abs(x-a))+ln (SQR(x+1)));
F:=x*(ascr(SQR(a*x)+(b*x)))+ln(x-a+1);
Пишет неверное выражение под Y.

[type_Oleg]

F:=x*(ascr(SQR(a*x)+(b*x)))+ln(x-a+1);

- что такое ascr ?
- у тебя должно быть а в квадрате на х, а не (a*x) в квадрате. То что под корнем
- и где e в степени минус x ?

[Vladislav125]

я делал по примеру который ты дал у нас почти похожие примеры

[Vladislav125]

можешь исправить ошибки?и написать правильно

[type_Oleg]

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

я делал по примеру который ты дал у нас почти похожие примеры

Ну, тогда сравни , прям по буквам:
Там:

F:=x*sqrt(a*x*x+b*x)+Exp(-x)+ln(abs(x-a)+1);

У тебя:

F:=x*(ascr(SQR(a*x)+(b*x)))+ln(x-a+1);

А разница у вас должна быть - без модуля в логарифме.

[Vladislav125]

Y:=a*power(x,5)*(arctan(a+x)-(sqrt(abs(x-a))+ln (SQR(x+1)));
F:=x*sqrt(a*x*x+b*x)+Exp(-x)+ln(abs(x-a+1);
теперь все исправил, но под Y выдает ошибку ожидалась закрывающая скобка

[type_Oleg]

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

...
теперь все исправил, но под Y выдает ошибку ожидалась закрывающая скобка

... ln(abs(x-a+1);
Посчитай скобки. А вообще, у тебя в задании есть модуль под логарифмом ?

PS И для Y проверь скобки

[Vladislav125]

у меня такое же задание как на той ссылке я все скобки посмотрел теперь пишет неверное выражение

[Aleksandr H.]

Y:=_*_(_,5)*(arctan(_+_)-(sqrt(abs(_-_))+ln (SQR(_+1)));

( - 8 Шт
) - 7 шт

[newerow1989]

Ну по фото я разобрал так:

Const a=3; b=5;
Var x,Y,F: real;
begin
   Writeln('Введите x>');
   Readln(x); {Ввод значения x}
   {Вычисление значений Y и F}
   Y:=a*power(x,5)*(arctan(a+x)-sqrt(abs(x-a))+ln (SQR(x+1)));
   F:=x*(sqrt(a*SQR(x)+(b*x)))+power(exp(1),-x)+ln(x-a+1);
   Writeln('При x=',x,'; y=',y,'; f=',f);
   Readln;
 end.