1 files changed, 15 insertions, 0 deletions
diff --git a/2021/CH14/EX14.7/EX14_7.sce b/2021/CH14/EX14.7/EX14_7.sce
new file mode 100755
index 000000000..56caf62f1
--- /dev/null
+++ b/2021/CH14/EX14.7/EX14_7.sce
@@ -0,0 +1,15 @@
+//Finding of Velocity of Prototype
+//Given
+vm=30;
+lm=100;
+lp=1;
+Am=0.018*10^-4;
+Ap=0.012*10^-4;
+rho1=1030;
+rho2=1.24;
+Fm=60;
+//To Find
+vp=(Ap/Am)*(lp/lm)*vm;
+Fp=Fm*(lm/lp)^2*(vp/vm)^2*(rho1/rho2);
+disp("Velocity of Prototype ="+string(vp)+" m/sec");
+disp("Resistance of Prototype ="+string(Fp)+" Newton");