Hemul GM

uses Math;

begin
  var a, b, c, x: integer;
  write('Введите A: '); readln(a);
  write('Введите B: '); readln(b);
  write('Введите C: '); readln(c);
  write('Введите X: '); readln(x);

  var y: Extended;
  if x < b then
    y := log10(abs(a + x)) * cos(abs(Power(x, 3)))
  else if (b <= x) and (x <= c) then
    y := Exp(1.2) - sqrt(abs(a + x))
  else if x > c then
    y := (Power(sqrt(abs(a + x)), 1 / 3)) / (a - x);
  writeln(y);
end.