1 files changed, 18 insertions, 0 deletions
diff --git a/3863/CH1/EX1.18/Ex1_18.sce b/3863/CH1/EX1.18/Ex1_18.sce
new file mode 100644
index 000000000..1f0fb9f97
--- /dev/null
+++ b/3863/CH1/EX1.18/Ex1_18.sce
@@ -0,0 +1,18 @@
+clear
+//
+
+//Given
+//Variable declaration
+dL=0.21          //Extension in mm
+L=400            //Length in mm
+t=10             //Thickness in mm
+a=100            //Width at bigger end in mm
+b=50             //Width at smaller end in mm
+E=2e5            //Youngs Modulus in N/sq.mm
+
+//Calculation
+P=int(dL/(((L)/(E*t*(a-b)))*((log(a)-log(b)))))*1e-3    //Axial load in kN
+
+
+//Result
+printf("\n Axial load = %0.3f  kN",P)