~PascalABC.NET
begin
var a,x:double;
write('Введите a и x: ');
read(a, x);
write('y(x) = ', power(x*x*x - a, 1/3) + sin(x*x)/ a);
end.
