1 files changed, 19 insertions, 0 deletions
diff --git a/2021/CH18/EX18.14/EX18_14.sce b/2021/CH18/EX18.14/EX18_14.sce
new file mode 100755
index 000000000..0e257a19f
--- /dev/null
+++ b/2021/CH18/EX18.14/EX18_14.sce
@@ -0,0 +1,19 @@
+//Finding of Pressure Head ,Efficiency
+//Given
+Di=0.8;
+Do=1.2;
+V2=3;
+L=8;
+y=2;
+Hs=6;
+g=9.81;
+//To Find
+Q=(%pi/4)*Do^2*V2;
+V1=Q/((%pi/4)*Di^2);
+a=(V1^2/(2*g))-(V2^2/(2*g));
+b=0.25*(V2^2/(2*g));
+P=10.3-Hs-a-b;
+E=(a-b)/(V1^2/(2*g));
+E1=E*100;disp(V1);
+disp("Pressure Head ="+string(P)+" meter of water");
+disp("Efficiency ="+string(E1)+" Percentage");