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

Wolfram Mathematica Online Integrator
The world's only full-power integration solver
∫

-(CosIntegral[a + x]*Sin[a]) + Cos[a]*SinIntegral[a + x]


Integrate[Sin[x]/(a + x), x] ==
-(CosIntegral[a + x]*Sin[a]) + Cos[a]*SinIntegral[a + x]



          Sin[x]
Integrate[------, x] == 
          a + x

-(CosIntegral[a + x] Sin[a]) + 
 
  Cos[a] SinIntegral[a + x]

Time to compute: 0.02 second

Spread the word: