1 files changed, 20 insertions, 0 deletions
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)