Pascal 2.6.0 помогите с задачей пожалуйста. Ребят, я даже не знаю куда обратиться, помогите пожалуйста с решением задачи в Pascal 2.6.0 free. не могу решить задачу, если есть возможность распишете пожалуйста полностью ее, очень буду вам благодарен.
Free Pascal)))) var x,y:real; begin Write('x='); read(x); if x<-4 then y:=tan(x) else<br> y:=x**4.8; if (x>=-4) and (x<=4) then y:= sqrt(abs(x))-(x+4)**2;<br> writeln('y=',y:0:4); end.