Pascal 2.6.0 помогите с задачей пожалуйста.Ребят, я даже не знаю куда

Pascal 2.6.0 помогите с задачей пожалуйста.
Ребят, я даже не знаю куда обратиться, помогите пожалуйста с решением задачки в Pascal 2.6.0 free. не могу решить задачку, если есть возможность распишете пожалуйста стопроцентно ее, очень буду для вас признателен.

Задать свой вопрос
1 ответ
Free Pascal))))
var x,y:real;

begin

Write('x=');

read(x);

if xlt;-4 then y:=tan(x) else

y:=x**4.8;

if (xgt;=-4) and (xlt;=4) then y:= sqrt(abs(x))-(x+4)**2;

writeln('y=',y:0:4);

end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт