WolframAlpha computational knowledge AI
FourierSeries[UnitStep[t],t,3]