---

program Variant3_Task1;
uses Math;
var x, a, b, y: Real;
begin
  Write('x, a, b: '); Readln(x, a, b);
  
  y := IfThen((x >= -1) and (x < 1), ln(sqr(x)) - exp(a * x) + 1 / x, IfThen(x < -1, sin(a - b * sqr(x)) / cos(a - b * sqr(x)) - b * abs(x), arctan(a * x) + sqrt(a + b * x)));
  
  Writeln('y = ', y:0:5); Readln;
end.