summaryrefslogtreecommitdiff
path: root/3689/CH12/EX12.8/12_8.sce
blob: 845b46c31040c4e34da6cc4b13a25f18ced92d28 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
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)