pastebin

var x, y, y3: real;

 

    readln(x, y);

    if y = 0 then y3 := 0 else y3 := exp(ln(abs(y)) / 3);

    if y < 0 then y3 := -y3;

    writeln((x + pi * y3) / (y + pi));

end.