summaryrefslogtreecommitdiff
path: root/116/CH12/EX12.2/exa12_2.sce
blob: e5e5dd433573286dada90e3f6f4669f6b24e4c7f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33

//Example 12.2
 
//Page 526
 
disp('The average number of arrivals in a 30 sec interval is,')

lamt=4*(30/60)

disp('The probability of eight or more arrivals is,')

P0=1

P1=[(2^1)/(1)]

P2=[(2^2)/(1*2)]

P3=[(2^3)/(1*2*3)]

P4=[(2^4)/(1*2*3*4)]

P5=[(2^5)/(1*2*3*4*5)]

P6=[(2^6)/(1*2*3*4*5*6)]

P7=[(2^7)/(1*2*3*4*5*6*7)]

i=1-{(%e^-2)*[P0+P1+P2+P3+P4+P5+P6+P7]}

disp("Result")
 
disp("P(2) = 0.0011")