diff options
Diffstat (limited to '3526/CH6/EX6.4/EX6_4.sce')
| -rw-r--r-- | 3526/CH6/EX6.4/EX6_4.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3526/CH6/EX6.4/EX6_4.sce b/3526/CH6/EX6.4/EX6_4.sce new file mode 100644 index 000000000..1f90c0d38 --- /dev/null +++ b/3526/CH6/EX6.4/EX6_4.sce @@ -0,0 +1,14 @@ +clc;funcprot(0);//EXAMPLE 6.4
+// Initialisation of Variables
+Lf=2.195;........//Final length after failure
+d1=0.505;.......//Diameter of alluminum alloy in in
+d2=0.398;......//Final diameter of alluminum alloy in in
+Lo=2;..........//Initial length of alluminum alloy
+//CALCULATIONS
+A0=(%pi/4)*d1^2;........//Area of original of alluminum alloy
+Af=(%pi/4)*d2^2;........//Area of final of alluminum alloy
+%E=((Lf-Lo)/Lo)*100;.....//Percentage of Elongation
+%R=((A0-Af)/A0)*100;......//Percentage of Reduction in area
+disp(%E,"Percentage of Elongation:")
+disp(%R,"Percentage of Reduction in area:")
+printf("The final length is less than 2.205 in because, after fracture, the elastic strain is recovered.")
|