Integrate[Pi*(r^2-x^2),{x,-r,-r^2/2/R}]+Integrate[Pi*(R^2-(x+R)^2),{x,-r^2/2/R,0}]