1 files changed, 12 insertions, 0 deletions
diff --git a/1574/CH2/EX2.9/SCS_ex_2_9.sce b/1574/CH2/EX2.9/SCS_ex_2_9.sce
new file mode 100755
index 000000000..fe621f713
--- /dev/null
+++ b/1574/CH2/EX2.9/SCS_ex_2_9.sce
@@ -0,0 +1,12 @@
+clc;
+// Chapter 2 Switched communication systems
+//Example 2.9,page no 129
+//given
+N=5//no of switches
+A=0.9//traffic offered 
+//grade of service B=(A^N/N!)/(1+A+A^2/2!+A^3/3!+...+A^N/N!)
+//here
+B=(A^N/factorial(N))/(1+A+(A^2/factorial(2))+(A^3/factorial(3))+(A^4/factorial(4))+(A^5/factorial(5)))
+mprintf('grade of service is: %f\n',B)
+Tl=A*B//traffic lost
+mprintf('traffic lost is:%f',Tl)