sum((1000!/(n!(1000-n)!) * n * (.001^n) * (.999 ^ (1000-n))) for n = 0,1000