initial commit / add all books

28 files changed, 262 insertions, 0 deletions

diff --git a/2021/CH18/EX18.1/EX18_1.pdf b/2021/CH18/EX18.1/EX18_1.pdf
new file mode 100755
index 000000000..de332417e
--- /dev/null
+++ b/2021/CH18/EX18.1/EX18_1.pdf
diff --git a/2021/CH18/EX18.1/EX18_1.sce b/2021/CH18/EX18.1/EX18_1.sce
new file mode 100755
index 000000000..88b465538
--- /dev/null
+++ b/2021/CH18/EX18.1/EX18_1.sce
@@ -0,0 +1,19 @@
+//Finding of Power delivered , Efficiency

+//Given

+u=35;

+Q=1;

+theta=10; 

+H=270;

+Cv=0.98;

+g=9.81;

+rho=1000;

+//To Find

+V=Cv*sqrt(2*g*H);

+Vr=V-u;

+Vw1=Vr*cos(%pi/18)-u;

+W=rho*(Q*(V+Vw1)*u);

+P=W/1000;

+E=(2*(V+Vw1)*u)/V^2;

+E1=E*100;

+disp("Power delivered ="+string(P)+" Kilo watts");

+disp("Hydraulic Efficiency ="+string(E1)+" percentage");

diff --git a/2021/CH18/EX18.10/EX18_10.sce b/2021/CH18/EX18.10/EX18_10.sce
new file mode 100755
index 000000000..9cf783063
--- /dev/null
+++ b/2021/CH18/EX18.10/EX18_10.sce
@@ -0,0 +1,20 @@
+//Finding of Vane Angle ,Head ,Velocity ,Efficiency

+//Given

+u=12;

+D=0.8;

+D1=1;

+Vw1=0;

+Hout=1;

+Vw=12;

+Vf=3;

+g=9.81;

+//To Find

+a=atand(Vf/Vw);

+V=sqrt(Vw^2+Vf^2);

+u1=(D1/D)*u;

+V1=u1*tan(%pi/9);

+H=((V1^2/(2*g))+1)+((Vw*u)/g);

+E=((Vw*u)/(g*H))*100;

+disp("Absolute Velocity ="+string(V)+" m/sec");

+disp("Vane Angle ="+string(a)+" degrees");

+disp("Efficiency ="+string(E)+" Percentage");

diff --git a/2021/CH18/EX18.10/Ex18_10.pdf b/2021/CH18/EX18.10/Ex18_10.pdf
new file mode 100755
index 000000000..544fbecd5
--- /dev/null
+++ b/2021/CH18/EX18.10/Ex18_10.pdf
diff --git a/2021/CH18/EX18.11/EX18_11.sce b/2021/CH18/EX18.11/EX18_11.sce
new file mode 100755
index 000000000..c00582d0e
--- /dev/null
+++ b/2021/CH18/EX18.11/EX18_11.sce
@@ -0,0 +1,24 @@
+//Finding of Angle ,Diameter ,Width

+//Given

+E=0.75;

+P=147.15;

+H=8;

+N=200;

+Vw1=0;

+Cv=0.3;

+g=9.81;

+rho=1000;

+//To Find

+u=Cv*sqrt(2*g*H);

+Vf=0.96*sqrt(2*g*H);

+E1=0.8;

+Vw=(E1*g*H)/u;

+a=atand(Vf/Vw);

+b=atand(Vf/(Vw-u));

+D=(60*u)/(%pi*N);

+Q=(E1*P*1000)/(E*rho*Vw*u);

+B=Q/(%pi*D*Vf);

+disp("Diameter ="+string(D)+" meter");

+disp(" Inlet angle ="+string(a)+" degrees");

+disp(" Outlet angle ="+string(b)+" degrees");

+disp("Width ="+string(B)+" meter");

diff --git a/2021/CH18/EX18.11/Ex18_11.pdf b/2021/CH18/EX18.11/Ex18_11.pdf
new file mode 100755
index 000000000..6ce0d39c2
--- /dev/null
+++ b/2021/CH18/EX18.11/Ex18_11.pdf
diff --git a/2021/CH18/EX18.14/EX18_14.pdf b/2021/CH18/EX18.14/EX18_14.pdf
new file mode 100755
index 000000000..752b2e60a
--- /dev/null
+++ b/2021/CH18/EX18.14/EX18_14.pdf
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");

diff --git a/2021/CH18/EX18.15/EX18_15.pdf b/2021/CH18/EX18.15/EX18_15.pdf
new file mode 100755
index 000000000..c24747afa
--- /dev/null
+++ b/2021/CH18/EX18.15/EX18_15.pdf
diff --git a/2021/CH18/EX18.15/EX18_15.sce b/2021/CH18/EX18.15/EX18_15.sce
new file mode 100755
index 000000000..a7502d7e6
--- /dev/null
+++ b/2021/CH18/EX18.15/EX18_15.sce
@@ -0,0 +1,11 @@
+//Finding of Speed ,Power developed

+//Given

+P1=8000;

+N1=90;

+H1=25;

+H2=15;

+//To Find

+N2=N1*(sqrt(H2)/sqrt(H1));

+P2=(P1*(H2)^(3/2))/(H1)^(3/2);

+disp("Speed ="+string(N2)+" rpm");

+disp("Power Developed ="+string(P2)+" Kilo watts");

diff --git a/2021/CH18/EX18.16/EX18_16.pdf b/2021/CH18/EX18.16/EX18_16.pdf
new file mode 100755
index 000000000..57a987ed0
--- /dev/null
+++ b/2021/CH18/EX18.16/EX18_16.pdf
diff --git a/2021/CH18/EX18.16/EX18_16.sce b/2021/CH18/EX18.16/EX18_16.sce
new file mode 100755
index 000000000..05fc0ba5e
--- /dev/null
+++ b/2021/CH18/EX18.16/EX18_16.sce
@@ -0,0 +1,13 @@
+//Finding of Specific speed,Power generated

+//Given

+H=30;

+N=300;

+Q=10;

+E=0.9;

+g=9.81;

+rho=1000;

+//To Find

+P=(E*rho*g*Q*H)/1000;

+Ns=(N*sqrt(P))/(H)^(5/4);

+disp("Power Developed ="+string(P)+" Kilowatts");

+disp("Specific Speed ="+string(Ns)+" rpm");

diff --git a/2021/CH18/EX18.2/EX18_2.pdf b/2021/CH18/EX18.2/EX18_2.pdf
new file mode 100755
index 000000000..8f69e695c
--- /dev/null
+++ b/2021/CH18/EX18.2/EX18_2.pdf
diff --git a/2021/CH18/EX18.2/EX18_2.sce b/2021/CH18/EX18.2/EX18_2.sce
new file mode 100755
index 000000000..ac0f0e6b8
--- /dev/null
+++ b/2021/CH18/EX18.2/EX18_2.sce
@@ -0,0 +1,22 @@
+//Finding of D,d number of jets

+//Given

+E=0.86;

+Dr=10;

+Cv=0.98;

+a=0.45;

+Sp=735.75*1000;

+H=200;

+g=9.81;

+N=800;

+rho=1000;

+//To Find

+V=Cv*sqrt(2*g*H);

+u=V*a;

+D=(60*u)/(%pi*N);

+d=(D/10);

+Q1=(%pi/4)*(d^2)*V;

+Q2=1/((E*rho*g*H)/Sp);

+j=Q2/Q1;disp(Q2);

+disp("D= "+string(D)+" meter");

+disp("d= "+string(d)+" meter");

+disp("Number of Jets ="+string(j)+" nos");

diff --git a/2021/CH18/EX18.3/EX18_3.pdf b/2021/CH18/EX18.3/EX18_3.pdf
new file mode 100755
index 000000000..05e896a20
--- /dev/null
+++ b/2021/CH18/EX18.3/EX18_3.pdf
diff --git a/2021/CH18/EX18.3/EX18_3.sce b/2021/CH18/EX18.3/EX18_3.sce
new file mode 100755
index 000000000..261ce0d57
--- /dev/null
+++ b/2021/CH18/EX18.3/EX18_3.sce
@@ -0,0 +1,18 @@
+//Finding of Power ,Efficiency

+//Given

+D=0.8;

+N=1000;

+a=15;

+Q=0.15;

+Cv=0.98;

+rho=1000'

+g=9.81;

+H=400;

+//To Find

+u=(%pi*D*N)/60;

+V=Cv*sqrt(2*g*H);

+P=(rho*g*Q*H)/1000;

+E=2*(V-u)*(1+cos(%pi/12))*u

+E1=(E/V^2)*100;

+disp("Power available ="+string(P)+" Kilo watts");

+disp("Hydraulic efficiency ="+string(E1)+" percentage");

diff --git a/2021/CH18/EX18.4/EX18_4.pdf b/2021/CH18/EX18.4/EX18_4.pdf
new file mode 100755
index 000000000..0c8e3b9d2
--- /dev/null
+++ b/2021/CH18/EX18.4/EX18_4.pdf
diff --git a/2021/CH18/EX18.4/EX18_4.sce b/2021/CH18/EX18.4/EX18_4.sce
new file mode 100755
index 000000000..cb4481be9
--- /dev/null
+++ b/2021/CH18/EX18.4/EX18_4.sce
@@ -0,0 +1,22 @@
+//Finding of Power delivered , Efficiency

+//Given

+Q=1.8;

+theta=12; 

+Hg=450;

+H=300;

+hf=Hg/3;

+Cv=0.98;

+g=9.81;

+a=0.46;

+rho=1000;

+//To Find

+V=Cv*sqrt(2*g*H);

+u=a*V;

+Vr=V-u;disp(V);

+Vw1=Vr*cos(%pi/15)-u;

+W=rho*(Q*(V+Vw1)*u);

+P=W/1000;disp(V);

+E=(2*(V+Vw1)*u)/V^2;

+E1=E*100;

+disp("Power delivered ="+string(P)+" Kilo watts");

+disp("Hydraulic Efficiency ="+string(E1)+" percentage");

diff --git a/2021/CH18/EX18.5/EX18_5.pdf b/2021/CH18/EX18.5/EX18_5.pdf
new file mode 100755
index 000000000..addf6a335
--- /dev/null
+++ b/2021/CH18/EX18.5/EX18_5.pdf
diff --git a/2021/CH18/EX18.5/EX18_5.sce b/2021/CH18/EX18.5/EX18_5.sce
new file mode 100755
index 000000000..fffb8f5f2
--- /dev/null
+++ b/2021/CH18/EX18.5/EX18_5.sce
@@ -0,0 +1,19 @@
+//Finding of Power Developed ,Force Exerted

+//Given

+d=0.13;

+a=15;

+H=400;

+Cv=0.97;

+b=0.45;

+g=9.81;

+rho=1000;

+//To Find

+A=(%pi/4)*d^2;

+u=b*sqrt(2*g*H);

+V=0.97*sqrt(2*g*H);

+Vr1=0.8*(V-u);

+Vw1=u-(Vr1*cos(%pi/15));

+Fx=rho*A*V*(V-Vw1);

+P=(Fx*u)/1000;

+disp("Force Exerted ="+string(Fx)+" Newton");

+disp("Power developed ="+string(P)+" Kilo Watts");

diff --git a/2021/CH18/EX18.6/EX18_6.pdf b/2021/CH18/EX18.6/EX18_6.pdf
new file mode 100755
index 000000000..a03533821
--- /dev/null
+++ b/2021/CH18/EX18.6/EX18_6.pdf
diff --git a/2021/CH18/EX18.6/EX18_6.sce b/2021/CH18/EX18.6/EX18_6.sce
new file mode 100755
index 000000000..f05b19f78
--- /dev/null
+++ b/2021/CH18/EX18.6/EX18_6.sce
@@ -0,0 +1,11 @@
+//Finding of Discharge, Width

+//Given

+D=1.2;

+D1=0.6;

+Vf=1.8;

+B=.20;

+//To Find

+Q=(%pi*D*B*Vf);

+B1=((D*B)/D1)*100;

+disp("Discharge ="+string(Q)+" m^3/sec");

+disp("Width ="+string(B1)+" centimeter");

diff --git a/2021/CH18/EX18.7/EX18_7.pdf b/2021/CH18/EX18.7/EX18_7.pdf
new file mode 100755
index 000000000..41324d871
--- /dev/null
+++ b/2021/CH18/EX18.7/EX18_7.pdf
diff --git a/2021/CH18/EX18.7/EX18_7.sce b/2021/CH18/EX18.7/EX18_7.sce
new file mode 100755
index 000000000..f70f060ed
--- /dev/null
+++ b/2021/CH18/EX18.7/EX18_7.sce
@@ -0,0 +1,21 @@
+//Finding of Discharge,Power developed,Efficiency

+//Given

+N=500;

+H=100;

+D=1;

+A=35;

+a=15;

+b=60;

+Vw1=0;

+g=9.81;

+rho=1000;

+//To Find

+u=(%pi*D*N)/60;

+Vw=(tan(%pi/3)*u)/1.464;

+Vf=Vw*tan(%pi/12);

+Q=A*Vf;

+P=(rho*g*Vw*u)/1000;

+E=((Vw*u)/(g*H))*100;

+disp("Discharge ="+string(Q)+" m^3/sec");

+disp("Power Developed ="+string(P)+" Kilo Watts");

+disp("Efficiency ="+string(E)+" Percentage");

diff --git a/2021/CH18/EX18.8/EX18_8.sce b/2021/CH18/EX18.8/EX18_8.sce
new file mode 100755
index 000000000..d3205ca9e
--- /dev/null
+++ b/2021/CH18/EX18.8/EX18_8.sce
@@ -0,0 +1,21 @@
+//Finding of Power developed,Outlet Vane Angle ,Speed

+//Given

+H=100;

+D=.675;

+D1=0.5

+B=0.15;

+B1=.225;

+g=9.81;

+rho=1000;

+Vf=3;

+Vw=3;

+//To Find

+u=Vf/tan(%pi/15);

+N=1/((%pi*D)/(u*60));

+u1=u*(D1/D);disp(Vf);

+Vf1=(D*B*Vf)/(0.15*B1);

+z=atand(Vf1/u1);

+P=(rho*%pi*B*D1*Vf*Vw*u)/10000;

+disp("Speed ="+string(N)+" rpm");

+disp("Power Developed ="+string(P)+" Kilo Watts");

+disp("Outlet Vane Angle ="+string(z)+" degrees");

diff --git a/2021/CH18/EX18.8/Ex18_8.pdf b/2021/CH18/EX18.8/Ex18_8.pdf
new file mode 100755
index 000000000..970e7c7c7
--- /dev/null
+++ b/2021/CH18/EX18.8/Ex18_8.pdf
diff --git a/2021/CH18/EX18.9/EX18_9.pdf b/2021/CH18/EX18.9/EX18_9.pdf
new file mode 100755
index 000000000..ee1facb9d
--- /dev/null
+++ b/2021/CH18/EX18.9/EX18_9.pdf
diff --git a/2021/CH18/EX18.9/EX18_9.sce b/2021/CH18/EX18.9/EX18_9.sce
new file mode 100755
index 000000000..36966cdd1
--- /dev/null
+++ b/2021/CH18/EX18.9/EX18_9.sce
@@ -0,0 +1,22 @@
+//Finding of Work Done ,Vane Angles

+//Given

+D=0.5;

+D1=1;

+Vw1=0;

+Vf=3;

+Vf1=3;

+g=9.81;

+rho=1000;

+N=250;

+//To Find

+u=(%pi*D*N)/60;

+u1=(%pi*D1*N)/60;

+Vw=Vf/tan(%pi/12);

+a=atand(Vf/(Vw-u));

+b=atand(Vf1/u1);

+W=(Vw*u)/g;

+E=(W/10);

+disp("Inlet Vane Angle ="+string(a)+" degrees");

+disp("Outlet Vane Angle ="+string(b)+" degrees");

+disp("Work Done ="+string(W)+" N-m/N");

+disp("Efficiency ="+string(E)+" Percentage");