k = 1400/50-1, CDF[BinomialDistribution[40,0.9], k]