1 files changed, 6 insertions, 0 deletions
diff --git a/291/CH5/EX5.3a/eg5_3a.sce b/291/CH5/EX5.3a/eg5_3a.sce
new file mode 100755
index 000000000..e7880aab0
--- /dev/null
+++ b/291/CH5/EX5.3a/eg5_3a.sce
@@ -0,0 +1,6 @@
+function result= hyper(N, M, n, i)
+    result = factorial(N)*factorial(M)*factorial(n)*factorial(N+M-n)/(factorial(i)*factorial(N-i)*factorial(n-i)*factorial(M-n+i)*factorial(N+M));
+endfunction
+
+prob = hyper(15, 5,6, 4)+hyper(15, 5,6,5)+hyper(15,5,6,6);
+disp(prob, "Probability that the system will be functional is")
+\ No newline at end of file