1 files changed, 22 insertions, 0 deletions
diff --git a/3821/CH2/EX2.1/Example2_1.sce b/3821/CH2/EX2.1/Example2_1.sce
new file mode 100644
index 000000000..d54bc5a48
--- /dev/null
+++ b/3821/CH2/EX2.1/Example2_1.sce
@@ -0,0 +1,22 @@
+///Example 1.2 Page No:20
+///Find Cross-Section Area
+///Input data
+clc;
+clear;
+L1=5;                       //Length of steel bar in m
+d1=25*10^-3;               //Diametr of steel bar in mm
+deltaLt1=25*10^-3;         ///Steel 
+pt1=800;
+pi1=3.142;                  //Power load of steel bar in N
+
+////Calculation
+A1=(pi1/4)*((deltaLt1)^2); ///Cross-section area
+sigmat1=pt1/A1;           //Stress in  steel bar
+et1=deltaLt1/L1;            ///Strain in steel bar
+E1=sigmat1/et1;         //Young's modulus
+
+///Output
+mprintf('value of Cross-section area= %f  \n',A1);
+printf('value of stress in  steel bar= %f MN/m^2 \n',sigmat1);
+printf('value of strain in steel bar= %f \n',et1);
+printf('value of Youngs modulus= %f N/m^2 \n',E1);