summaryrefslogtreecommitdiff
path: root/3862/CH8/EX8.29/Ex8_29.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3862/CH8/EX8.29/Ex8_29.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 '3862/CH8/EX8.29/Ex8_29.sce')
-rw-r--r--3862/CH8/EX8.29/Ex8_29.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3862/CH8/EX8.29/Ex8_29.sce b/3862/CH8/EX8.29/Ex8_29.sce
new file mode 100644
index 000000000..5e832dde3
--- /dev/null
+++ b/3862/CH8/EX8.29/Ex8_29.sce
@@ -0,0 +1,22 @@
+clear
+//variable declaration
+
+L=(1000) //length of the bar at normal temperature,mm
+As=(50*10) //Area of steel,mm^2
+Ac=(40*5) //Area of copper,mm^2
+//Ac = Free expansion of copper is greater than free expansion of steel . To bring them to the same position, tensile force Ps acts on steel plate and compressive force Pc acts on each copper plate.
+alphas=(0.000012) //Expansion of coeffcient of steel,/°C
+alphac=(0.000017 ) //Expansion of coeffcient of copper,/°C
+t=80 //raise by temperature, °C
+Es=2*100000 //Young's modulus of steel,N/mm^2
+Ec=1*100000 //Young's modulus of copper,N/mm^2
+Pc=((alphac-alphas)*t*L)/((2*L/(As*Es)) +(L/(Ac*Ec)))
+Ps=2*Pc
+
+pc=Pc/Ac //Stress in copper,N/mm^2
+ps=Ps/As //Stress in steel, N/mm^2
+
+Changeinlength=alphas*t*L+(Ps*L/(As*Es))
+
+
+printf("\n Change in length= %0.2f mm",Changeinlength)