Sum[Abs[UnitStep[n]*(-0.8)^(n) - UnitStep[n-1]*(-0.8)^(n-1)],{n,0,Infinity}]

Uh oh! Wolfram|Alpha doesn't run without JavaScript.

Please enable JavaScript. If you don't know how, you can find instructionshere.Once you've done that, refresh this page to start using Wolfram|Alpha.