diff options
Diffstat (limited to '3808/CH7/EX7.9/Ex7_9.sce')
-rw-r--r-- | 3808/CH7/EX7.9/Ex7_9.sce | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/3808/CH7/EX7.9/Ex7_9.sce b/3808/CH7/EX7.9/Ex7_9.sce new file mode 100644 index 000000000..8d98ca511 --- /dev/null +++ b/3808/CH7/EX7.9/Ex7_9.sce @@ -0,0 +1,30 @@ +//Chapter 07: Discrete Probability + +clc; +clear; + +p0=0.9 //prob of bit 0 generation +p1=1-p0 //prob of bit 1 generation +total_bits=10 //total bits generated +reqd_bits=8 //reqd bits out of totalbits generated + +function result=combination(n,r) //function definition +i=n +num=1 +denominator=1 +l=(n-r)+1 +u=n +for i=l:u //to compute the value of the numerator +num=num*i +end +for j=1:r //to compute the value of the denominator +denominator=denominator*j +end +result=num/denominator +return result +endfunction + +//Using theorem 2 +prob_eight_0=combination(total_bits,reqd_bits)*((p0)**reqd_bits)*((p1)**(total_bits-reqd_bits)) + +disp(prob_eight_0,'Probability of exactly eight 0 bits generated is') |