diff options
Diffstat (limited to '1187/CH12/EX12.1/1.sce')
-rwxr-xr-x | 1187/CH12/EX12.1/1.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/1187/CH12/EX12.1/1.sce b/1187/CH12/EX12.1/1.sce new file mode 100755 index 000000000..67b062b21 --- /dev/null +++ b/1187/CH12/EX12.1/1.sce @@ -0,0 +1,15 @@ +clc
+
+Q=0.05; // m^3/s
+d=0.15; // m^2
+h=8; // m
+g=9.81; // m/s^2
+l=90; // m
+f=0.007;
+
+u1=Q/(%pi/4*d^2);
+
+t=-integrate('1/((h*g/l)+(2*f/d)*u^2)', 'u', u1, 0);
+disp("Time for which flow into the tank continues after the power failure = ")
+disp(t)
+disp("s")
\ No newline at end of file |