diff options
Diffstat (limited to '3647/CH6')
| -rw-r--r-- | 3647/CH6/EX6.1/ex6_1.sce | 14 | ||||
| -rw-r--r-- | 3647/CH6/EX6.10/ex6_10.sce | 19 | ||||
| -rw-r--r-- | 3647/CH6/EX6.11/ex6_11.sce | 27 | ||||
| -rw-r--r-- | 3647/CH6/EX6.12/ex6_12.sce | 20 | ||||
| -rw-r--r-- | 3647/CH6/EX6.13/ex6_13.sce | 26 | ||||
| -rw-r--r-- | 3647/CH6/EX6.14/ex6_14.sce | 14 | ||||
| -rw-r--r-- | 3647/CH6/EX6.2/ex6_2.sce | 20 | ||||
| -rw-r--r-- | 3647/CH6/EX6.3/ex6_3.sce | 18 | ||||
| -rw-r--r-- | 3647/CH6/EX6.4/Ex6_4.sce | 22 | ||||
| -rw-r--r-- | 3647/CH6/EX6.5/Ex6_5.sce | 20 | ||||
| -rw-r--r-- | 3647/CH6/EX6.6/ex6_6.sce | 16 | ||||
| -rw-r--r-- | 3647/CH6/EX6.7/ex6_7.sce | 18 | ||||
| -rw-r--r-- | 3647/CH6/EX6.8/ex6_8.sce | 18 | ||||
| -rw-r--r-- | 3647/CH6/EX6.9/ex6_9.sce | 27 |
14 files changed, 279 insertions, 0 deletions
diff --git a/3647/CH6/EX6.1/ex6_1.sce b/3647/CH6/EX6.1/ex6_1.sce new file mode 100644 index 000000000..208051165 --- /dev/null +++ b/3647/CH6/EX6.1/ex6_1.sce @@ -0,0 +1,14 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+b=0.005//in
+a=2//tonf
+p=10//tonf
+l=13500//tonf/in^2
+//CALCULATIONS
+x=(p/a)*b//in
+E=(l*b*1/2)/a//in
+//RESULTS
+printf('the original length of bar =% f in',E)
diff --git a/3647/CH6/EX6.10/ex6_10.sce b/3647/CH6/EX6.10/ex6_10.sce new file mode 100644 index 000000000..da97ba545 --- /dev/null +++ b/3647/CH6/EX6.10/ex6_10.sce @@ -0,0 +1,19 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+clear
+E=2*10^6//lbf/in^2
+s=600//lbf/in^2
+w=12//in
+l=80//tonf
+w1=4//ft
+E1=30*10^6//lbf/in^2
+h=2240//in
+s2=10.9//in^2
+F=9000//lbf/in^2
+//CALCULATIONS
+L=(F*w1*w/E1)//in
+//RESULTS
+printf('the column shortens by=% f in',L)
diff --git a/3647/CH6/EX6.11/ex6_11.sce b/3647/CH6/EX6.11/ex6_11.sce new file mode 100644 index 000000000..6627f3dfd --- /dev/null +++ b/3647/CH6/EX6.11/ex6_11.sce @@ -0,0 +1,27 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+clear
+E1=30*10^6//lbf/in^2
+E2=15*10^6//lbf/in^2
+alf=6.4*10^-6//degF-1
+alf1=9.5*10^-6//degF-1
+t=170//deg
+t1=50//deg
+w=5//tonf
+ec=0.000248//lbf/in^2
+es=0.000124//lbf/in^2
+h=2240//in
+//CALCULATIONS
+e=(alf1-alf)*(t-t1)//in
+Ec=E2*ec//lbf/in^2
+Es=E1*es//lbf/in^2
+F=E1/E2//fc
+S=w*h/(2*1+1)//lbf/in^2
+S1=S*2//lbf/in^2
+R=-Es+S//lbf/in^2
+R1=Es+S1//lbf/in^2
+//RESULTS
+printf('The final stress in the steel and applied to the compound =% f lbf/in^2',R1)
diff --git a/3647/CH6/EX6.12/ex6_12.sce b/3647/CH6/EX6.12/ex6_12.sce new file mode 100644 index 000000000..e67dc7c1d --- /dev/null +++ b/3647/CH6/EX6.12/ex6_12.sce @@ -0,0 +1,20 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+a=1/16//ft/s
+h=100//lbf/in^2
+w=10//lbf/in^2
+q=2//in
+b=%pi/4*(3/16)^2//in^2
+p=5//inch valu per 12.7
+//CALCULATIONS
+H=(h*w)/(q*a)//lbf/in^2
+F=H*1*a//lbf
+A=H/2//lbf/in^2
+R=(b)/(F/A)*5.14*4//per inch
+F1=A*1*a//lbf
+m=(b)/(F1/A)*5.14//per inch
+//RESULTS
+printf('the force per inch of circumferential seam=% f per in',m)
diff --git a/3647/CH6/EX6.13/ex6_13.sce b/3647/CH6/EX6.13/ex6_13.sce new file mode 100644 index 000000000..a3f0ae115 --- /dev/null +++ b/3647/CH6/EX6.13/ex6_13.sce @@ -0,0 +1,26 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+clear
+p=14.7//lbf/in^2
+w=15000//lbf/in^2
+p1=190//lbf/in^2
+q=0.35//percent
+q1=0.75//percent
+w1=2//ft
+q2=36//tonf/in^2
+f=6//in
+r1=3/8//in
+p2=4//in
+h=2240//in
+//CALCULATIONS
+A=w*q//lbf/in^2
+E=w*q1//lbf/in^2
+M1=(p2*A*(1/2)/(p1-p))//in
+M2=(w1*E*(1/2)/(p1-p))//in
+M3=p2*r1*((q2*h)/f)/(w1*12)//lbf/in^2 gauge
+//RESULTS
+printf('the Maximum possible diameter of cylinder =% f in',M2)
+printf('the Maximum allowable pressure=% f lbf/in^2 gauge',M3)
diff --git a/3647/CH6/EX6.14/ex6_14.sce b/3647/CH6/EX6.14/ex6_14.sce new file mode 100644 index 000000000..97be99d66 --- /dev/null +++ b/3647/CH6/EX6.14/ex6_14.sce @@ -0,0 +1,14 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+clear
+w=450//lbf/in^2
+m=3000//lbf/in^2
+g=32.2//lbf/in^2
+h=144//in
+//CALCULATIONS
+M=sqrt(g*m*h/w)//ft/f
+//RESULTS
+printf('the maximum rim speed of flywheel=% f ft/f',M)
diff --git a/3647/CH6/EX6.2/ex6_2.sce b/3647/CH6/EX6.2/ex6_2.sce new file mode 100644 index 000000000..31d33c817 --- /dev/null +++ b/3647/CH6/EX6.2/ex6_2.sce @@ -0,0 +1,20 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +
+clc
+//initialisation of variables
+p1=12000//in
+p2=0.0125//lbf/in
+x=8//in
+w=14300//in
+r=0.122//in
+//CALCULATIONS
+M=(p1/p2)*(x/(%pi/4*1^2))//lbf/in^2
+P=0.1*x/100//in
+S=w/(%pi/4*1^2)//lbf/in^2
+P1=(r*100/x)//percent
+//RESULTS
+printf('the modulus of elasticity=% f lbf/in^2',M)
+printf('non-proportional elongation=% f lbf/in^2',S)
+printf('the percentage elongation=% f percent',P1)
diff --git a/3647/CH6/EX6.3/ex6_3.sce b/3647/CH6/EX6.3/ex6_3.sce new file mode 100644 index 000000000..5ddd8ab23 --- /dev/null +++ b/3647/CH6/EX6.3/ex6_3.sce @@ -0,0 +1,18 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+w=0.5//tonf/in^2
+w1=7//tonf/in^2
+w2=10//tonf/in^2
+t=12.4//tonf/in^2
+d1=1.5//in
+d2=1.24//in
+x=0.495//in
+d3=3.02//in
+//CALCULATIONS
+Y=sqrt((d3/2)^2-(d2/2)^2)//in
+S=(1/2*t/(2*Y*w))//tonf/in^2
+//RESULTS
+printf('the shear stress in fork end=% f tonf/in^2',S)
diff --git a/3647/CH6/EX6.4/Ex6_4.sce b/3647/CH6/EX6.4/Ex6_4.sce new file mode 100644 index 000000000..34b0401d7 --- /dev/null +++ b/3647/CH6/EX6.4/Ex6_4.sce @@ -0,0 +1,22 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +
+clc
+//initialisation of variables
+g=2//in
+t=0.002//in
+l=7500//lbf
+w=11000//lbf
+p=1/4//in
+//CALCULATIONS
+W=1/2*l*t//in lbf
+P=t*(w/l)//in
+S=w/p//lbf/in^2
+E=S*g/P//lbf/in^2
+R=(1/2)*w*P//in lbf
+//RESULTS
+printf('The elongation at the elastic limit=% f in',P)
+printf('The stress at the elastic limit=% f lbf/in^2',S)
+printf('The modulus of elasticity E of the material is=% f lbf/in^2',E)
+printf('The resilience and modulus of elasticity=% f in lbf',R)
diff --git a/3647/CH6/EX6.5/Ex6_5.sce b/3647/CH6/EX6.5/Ex6_5.sce new file mode 100644 index 000000000..d58c3db57 --- /dev/null +++ b/3647/CH6/EX6.5/Ex6_5.sce @@ -0,0 +1,20 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear; + +clc +//initialisation of variables +v=4//in +w=20//tonf +d=10//ft +m=13400//tonf/in^2 +q=2//in +l=120//in +//CALCULATIONS +Fmax=q*(w)/(%pi/v*v^2)//tonf/in^2 +M=Fmax*l/m//in +P=w*M//in tonf +//RESULTS +printf('The maximum instantneous stress=% f tonf/in^2',Fmax) +printf('The maximum elongation is=% f in',M) +printf('the strain energy stored=% f in tonf',P)
\ No newline at end of file diff --git a/3647/CH6/EX6.6/ex6_6.sce b/3647/CH6/EX6.6/ex6_6.sce new file mode 100644 index 000000000..f8e48961f --- /dev/null +++ b/3647/CH6/EX6.6/ex6_6.sce @@ -0,0 +1,16 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+d=4//in
+p=2//ft
+d1=1/2//in
+e=13200//tonf/in^2
+f=9.51//tonf/in^2
+k=0.0114//tonf/in^2
+//CALCULATIONS
+E=k*f//in tonf
+F=(p/(%pi/d*d^2))//tonf/in^2
+//RESULTS
+printf('the final stress after oscillation has died aways will load/area=% f tonf/in^2',F)
diff --git a/3647/CH6/EX6.7/ex6_7.sce b/3647/CH6/EX6.7/ex6_7.sce new file mode 100644 index 000000000..afc707f89 --- /dev/null +++ b/3647/CH6/EX6.7/ex6_7.sce @@ -0,0 +1,18 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+h=3//in
+s=10.2//tonf/in^2
+v=0.006//in
+d=0.5//in
+d1=0.75//in
+w=20//lbf
+q=v/8//tonf/in^2
+x=0.029//in
+//CALCULATIONS
+M=s/q//tonf/in^2
+E=M*(x)/(h*12)//tonf/in^2
+//RESULTS
+printf('the corresponding stress=% f tonf/in^2',E)
diff --git a/3647/CH6/EX6.8/ex6_8.sce b/3647/CH6/EX6.8/ex6_8.sce new file mode 100644 index 000000000..4cfa6c263 --- /dev/null +++ b/3647/CH6/EX6.8/ex6_8.sce @@ -0,0 +1,18 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+e=30*10^2//lbf/in^2
+b=15//in
+t=50//percent
+p=1.5//in
+v=6//in
+h=2240//lbf
+I=0.0038//in
+//CALCULATIONS
+W=1/2*v*I//in tonf
+w1=W*p//in tonf
+T=sqrt((v^2*h)/(2*%pi/4*e))/((b)/(p)^2/(1)^2)*10//in
+//RESULTS
+printf('the total energy in the bar=% f in',T)
diff --git a/3647/CH6/EX6.9/ex6_9.sce b/3647/CH6/EX6.9/ex6_9.sce new file mode 100644 index 000000000..43fe6f4be --- /dev/null +++ b/3647/CH6/EX6.9/ex6_9.sce @@ -0,0 +1,27 @@ +//Solutions to Problems In applied mechanics +//A N Gobby +clear all; +clc
+//initialisation of variables
+clear
+E=13400//tonf/in^2
+E1=5600//tonf/in^2
+h=7//tonf/in^2
+h1=3.5//tonf/in^2
+w=1.5//ij
+l=5//tonf
+A=%pi/4*1^2//in^2
+A1=%pi/4*(w^2-1^2)//in^2
+s=1.91//tonf
+t=0.787//in
+pg=1.72//tonf
+//CALCULATIONS\
+m=h*t//tonf
+p=m/s//tonf
+g=p/A1//tonf/in^2
+m1=m+p//tonf
+S=pg/A1//tonf/in^2
+Ps=pg*s//tonf
+S1=Ps/t//tonf/in^2
+//RESULTS
+printf('the stress in the steel=% f tonf/in^2',S1)
|