* do-file for Supplementary Exercise 5.40 of IPS7e
version 15 /* works also with versions 13-14 */

* (b)
* normal approximation
display normal((84+0.5-200*.4)/sqrt(200*.4*.6)) - normal((76-0.5-200*.4)/sqrt(200*.4*.6))

* binomial distribution
* P(76<=X<=84) = P(X<=84) - P(X<=75)
display binomial(200,84,.4)
display binomial(200,75,.4)
display binomial(200,84,.4)-binomial(200,75,.4)

* (c)
* normal approximation
display 1-normal((99+0.5-200*.4)/sqrt(200*.4*.6))

* binomial distribution
display binomialtail(200,100,.4)