1 files changed, 19 insertions, 0 deletions
diff --git a/2021/CH6/EX6.7/EX6_7.sce b/2021/CH6/EX6.7/EX6_7.sce
new file mode 100755
index 000000000..1d3da7b72
--- /dev/null
+++ b/2021/CH6/EX6.7/EX6_7.sce
@@ -0,0 +1,19 @@
+//Finding of Rate Of Flow
+//Given
+d1=15;
+d2=30;
+hm=50;
+spgr=0.9;
+spgr1=13.6;
+cod=0.64;
+g=9.81;
+//To Find
+A0=(%pi/4)*d1^2;
+A1=(%pi/4)*d2^2;
+h=((spgr1/spgr)-1)*hm;
+x=(A0*A1)/sqrt(A1^2-A0^2);
+y=sqrt(2*g*h);
+q=cod*x*y;
+disp(" Discharge ="+string(q)+" cm^3/sec");
+q1=q/100;
+disp(" Discharge ="+string(q1)+" ltr/sec");