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

Wolfram Mathematica Online Integrator
The world's only full-power integration solver
∫
SinIntegral[a*x]

Integrate[Sin[a*x]/x, x] ==
SinIntegral[a*x] 

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

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