Plot[1 - 0.99^n, {n, 1, 500}]