function [] = chap_5_st_11() % % Written by: % -- % John L. Weatherwax 2007-04-02 % % email: wax@alum.mit.edu % % Please send comments and especially bug reports to the % above email address. % %----- % part a: z = (44-40.2)/8.4 p = 1 - normcdf( z ) % part b: binopdf( 3, 7, p )