summaryrefslogtreecommitdiff
path: root/3863/CH4/EX4.13/Ex4_13.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3863/CH4/EX4.13/Ex4_13.sce
parentd1e070fe2d77c8e7f6ba4b0c57b1b42e26349059 (diff)
downloadScilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.gz
Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.tar.bz2
Scilab-TBC-Uploads-7bc77cb1ed33745c720952c92b3b2747c5cbf2df.zip
Added new codeHEADmaster
Diffstat (limited to '3863/CH4/EX4.13/Ex4_13.sce')
-rw-r--r--3863/CH4/EX4.13/Ex4_13.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3863/CH4/EX4.13/Ex4_13.sce b/3863/CH4/EX4.13/Ex4_13.sce
new file mode 100644
index 000000000..c4540ae77
--- /dev/null
+++ b/3863/CH4/EX4.13/Ex4_13.sce
@@ -0,0 +1,22 @@
+clear
+//
+//Given
+//Variable declaration
+d=12 //Diameter of bar in mm
+delL=3 //Increase in length in mm
+W=8000 //Steady load in N
+P=800 //Falling weight in N
+h=8*10 //Vertical distance in mm
+E=2e5 //Youngs modulus in N/sq.mm
+
+//Calculation
+A=((%pi/4)*d**2) //Area of bar in sq.mm
+
+L=(E*A*delL/W) //Length of the bar in mm
+
+sigma=((P/A)*(1+(sqrt(1+((2*E*A*h)/(P*L))))))
+
+sigma=(sigma) //Stress produced by the falling weight in N/sq.mm
+
+//Result
+printf("\n Stress produced by the falling weight = %0.3f N/mm^2",sigma)