Plot[1 - 0.9^x, {x, -0, 50}]