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]

Integrate[Cos[a*x]/x, x] ==
CosIntegral[a*x] 

          Cos[a x]
Integrate[--------, x] == 
             x

CosIntegral[a x]
Time to compute: < 0.01 second
Spread the word: