6 files changed, 113 insertions, 0 deletions
diff --git a/3647/CH4/EX4.1/ex4_1.sce b/3647/CH4/EX4.1/ex4_1.sce
new file mode 100644
index 000000000..318e94786
--- /dev/null
+++ b/3647/CH4/EX4.1/ex4_1.sce
@@ -0,0 +1,14 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//initialisation of variables
+t=3//sec
+m=20//per mint
+a=4//ft
+//CALCULATIONS
+T=2*%pi/t//ft/s
+V=T*a//ft/s
+F=(T)^2*a//ft/s^2
+//RESULTS
+printf('th acceleration x must be a maximum=% f ft/s^2',F)
diff --git a/3647/CH4/EX4.2/ex4_2.sce b/3647/CH4/EX4.2/ex4_2.sce
new file mode 100644
index 000000000..e4083cb59
--- /dev/null
+++ b/3647/CH4/EX4.2/ex4_2.sce
@@ -0,0 +1,13 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//initialisation of variables
+a=10//ft/s
+x=1/12//ft/s
+g=32.2//ft
+//CALCULATIONS
+P=2*%pi*sqrt(x/a)//sec
+L=(P)/(2*%pi/sqrt(g))/2//ft
+//RESULTS
+printf('the simple pendulum =% f ft',L)
diff --git a/3647/CH4/EX4.3/ex4_3.sce b/3647/CH4/EX4.3/ex4_3.sce
new file mode 100644
index 000000000..35106883a
--- /dev/null
+++ b/3647/CH4/EX4.3/ex4_3.sce
@@ -0,0 +1,24 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//initialisation of variables
+w=20//lbf
+p=12//ft/s
+v1=15//ft/s
+g=32.2//ft
+v2=10//ft/s
+d1=6//in
+d2=9//in
+a=10.82//in
+//CALCULATIONS
+Um=(v2*p)/sqrt(a^2-d2^2)//sec^-1
+P=2*%pi/Um//sec
+V=w*a//in/s
+M=w^2*a/p//ft/s
+F=(w/g)*M//lbf
+//RESULTS
+printf('the velocity=% f in',a)
+printf('periodic time=% f sec',P)
+printf('the maximum velocity=% f in/s',V)
+printf('maximum acceleration=% f lbf',F)
diff --git a/3647/CH4/EX4.4/ex4_4.sce b/3647/CH4/EX4.4/ex4_4.sce
new file mode 100644
index 000000000..287dd92df
--- /dev/null
+++ b/3647/CH4/EX4.4/ex4_4.sce
@@ -0,0 +1,17 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//initialisation of variables
+w=4//lbf
+h=40//lbf/ft
+d=2//in
+g=32.2//ft/s
+//CALCULATIONS
+P=(d*%pi)*sqrt(w/(h*g))//sec
+V=(d*%pi*d)/(P*12)//ft/s
+M=(d*%pi/P)^2*(d/12)//ft/s
+//RESULTS
+printf('the period of vibration=% f sec',P)
+printf('Maximum veloity=% f ft/s',V)
+printf('Maximum acceleration=% f ft/s',M)
diff --git a/3647/CH4/EX4.5/Ex4_5.sce b/3647/CH4/EX4.5/Ex4_5.sce
new file mode 100644
index 000000000..886ff8ee6
--- /dev/null
+++ b/3647/CH4/EX4.5/Ex4_5.sce
@@ -0,0 +1,28 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+
+
+clc
+//initialisation of variables
+w=80//lbf
+p=4//ft
+d=20//stroke/min
+d1=3//in
+p1=0.6//sec
+h=2//ft/s
+g=32.2//ft/s
+t=60//sec
+//CALCULATIONS
+P=t/d//sec
+U=2*%pi/d1//sec^-1
+V=U*sqrt(h^2-(3/4)^2)//ft/s
+K=(w*V^2/(h*g))//lbf
+M=U^2*h//ft/s^2
+M1=(w/g)*M//lbf
+D=h*cosd(U*0.6*180/%pi)//ft
+D1=h-D//ft
+//RESULTS
+printf('the kinetic energy of the crosshead=% f lbf',K)
+printf('the maximum acceleration of force on crosshead=% f lbf',M1)
+printf('the distance from end of the path=% f ft',D1)
diff --git a/3647/CH4/EX4.6/ex4_6.sce b/3647/CH4/EX4.6/ex4_6.sce
new file mode 100644
index 000000000..b7b9e69ed
--- /dev/null
+++ b/3647/CH4/EX4.6/ex4_6.sce
@@ -0,0 +1,17 @@
+//Solutions to Problems In applied mechanics
+//A N Gobby
+clear all;
+clc
+//initialisation of variables
+d=3//in
+v=40//ft/s
+a=3000//ft/s^2
+p=5.31//in
+//CALCULATIONS
+U=sqrt(a/(d/12))//sec^-1
+E=(U*60/(2*%pi))//rev/min
+P=2/U//sec
+W=U*(p/12)//ft/s
+M=U^2*(p/12)//ft/s^2
+//RESULTS
+printf('the velocity of acceleration against time during one complete=% f ft/s^2',M)