summaryrefslogtreecommitdiff
path: root/1586/CH6/EX6.4/EXP6_4.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /1586/CH6/EX6.4/EXP6_4.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '1586/CH6/EX6.4/EXP6_4.sce')
-rw-r--r--1586/CH6/EX6.4/EXP6_4.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/1586/CH6/EX6.4/EXP6_4.sce b/1586/CH6/EX6.4/EXP6_4.sce
new file mode 100644
index 000000000..1f90c0d38
--- /dev/null
+++ b/1586/CH6/EX6.4/EXP6_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.")