1 files changed, 16 insertions, 0 deletions
diff --git a/2744/CH3/EX3.1/Ex3_1.sce b/2744/CH3/EX3.1/Ex3_1.sce
new file mode 100755
index 000000000..5cd022aa9
--- /dev/null
+++ b/2744/CH3/EX3.1/Ex3_1.sce
@@ -0,0 +1,16 @@
+clear;
+clc;
+d = 3/2;//inches
+l = 10;;//feet
+P = 8;//tons
+E = 13500;//tons/in^2
+A = 0.25*%pi*d^2;//in^2
+p = 2*P/A;// tons/in^2
+e = p/E;
+del_l = e*l*12;//inches
+W = P*del_l;//inch-ton
+printf('The maximum instantaneous stress produced is, p = %.2f tons/in^2',p);
+printf('\n The corresponding strain is e = %.6f \n  del_l = %.2f inches',e,del_l);
+printf('\n The work done on the rod and stored by it is %.2f inch-ton.',W);
+
+//there is an error in the answer given in text book