integrals.wolfram.com   Use one of Mathematica's 2500+ functions FREE online

Wolfram Mathematica Online Integrator
The world's only full-power integration solver
∫
An image showing the results of your requested integral.

Integrate[x/Sqrt[1 + Sin[x]], x] ==
((-2*Pi*ArcTanh[(-1 + Tan[x/4])/Sqrt[2]] + (Pi + 2*x)*(Log[1 - (-1)^(1/4)*E^((I/2)*x)] - Log[1 + (-1)^(1/4)*E^((I/2)*x)]) + (4*I)*PolyLog[2, -((-1)^(1/4)*E^((I/2)*x))] - (4*I)*PolyLog[2, (-1)^(1/4)*E^((I/2)*x)])* (Cos[x/2] + Sin[x/2]))/(Sqrt[2]*Sqrt[1 + Sin[x]]) 

                 x
Integrate[----------------, x] == 
          Sqrt[1 + Sin[x]]

                         x
                -1 + Tan[-]
                         4
((-2 Pi ArcTanh[-----------] + 
                  Sqrt[2]
 
                              1/4  I/2 x
      (Pi + 2 x) (Log[1 - (-1)    E     ] - 
 
                     1/4  I/2 x
         Log[1 + (-1)    E     ]) + 
 
                             1/4  I/2 x
      (4 I) PolyLog[2, -((-1)    E     )] - 
 
                           1/4  I/2 x
      (4 I) PolyLog[2, (-1)    E     ]) 
 
         x        x
    (Cos[-] + Sin[-])) / (Sqrt[2] Sqrt[1 + Sin[x]])
         2        2
Time to compute: 0.25 second
Spread the word: