summaryrefslogtreecommitdiff
path: root/1553/CH16/EX16.8/16Ex8.sce
blob: 48b4cd437a0174f13781361f4565ef80252642fd (plain)
1
2
3
4
5
6
7
8
9
10
11
12
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);