?

Integrate[Sqrt[R^2+r^2-2RrCos[Sqrt[(x-y)^2]]],x]
related computations
full Wolfram|Alpha results
In[4]:=
Integrate[Sqrt[R^2 + r^2 - 2*R*r*Cos[Sqrt[(x - y)^2]]], x]
Out[4]=
2
2
(x-y)
2
r
-2rRcos
2
(x-y)
+
2
R
E
1
2
2
(x-y)
-
4rR
2
(r-R)
(x-y)
2
r
-2rRcos
2
(x-y)
+
2
R
2
(r-R)
+
c
1