1 files changed, 13 insertions, 0 deletions
diff --git a/1553/CH16/EX16.8/16Ex8.sce b/1553/CH16/EX16.8/16Ex8.sce
new file mode 100644
index 000000000..48b4cd437
--- /dev/null
+++ b/1553/CH16/EX16.8/16Ex8.sce
@@ -0,0 +1,13 @@
+//Chapter 9 Ex 8
+
+clc;
+clear;
+close;
+//let B be closed after x min.Then part filled by(A+B) in x min +part filled by A in (18-x)=1
+x=poly(0,'x');
+for x=1:10
+    if ((x*(1/24+1/32))+((18-x)/24))==1
+        break;
+    end
+end
+mprintf("The pipe B should be closed after %d min",x);