diff options
Diffstat (limited to '3689/CH12/EX12.8')
| -rw-r--r-- | 3689/CH12/EX12.8/12_8.sce | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/3689/CH12/EX12.8/12_8.sce b/3689/CH12/EX12.8/12_8.sce new file mode 100644 index 000000000..845b46c31 --- /dev/null +++ b/3689/CH12/EX12.8/12_8.sce @@ -0,0 +1,22 @@ +//////
+//Variable Declaration
+n = 50 //Number of separate experiments
+j1 = 25 //Number of sucessful expt with heads up
+j2 = 10 //Number of sucessful expt with heads up
+
+//Calculation
+C25 = factorial(n)/(factorial(j1)*factorial(n-j1))
+PE25 = (1/2)**j1
+PEC25 = (1-(1/2))**(n-j1)
+P25 = C25*PE25*PEC25
+
+C10 = factorial(n)/(factorial(j2)*factorial(n-j2))
+PE10 = (1/2)**j2
+PEC10 = (1-(1/2))**(n-j2)
+P10 = C10*PE10*PEC10
+
+//Results
+printf("\n Probability of getting 25 head out of 50 tossing is %4.3f",P25)
+
+printf("\n Probability of getting 10 head out of 50 tossing is %4.3e",P10)
+
|