1 files changed, 19 insertions, 0 deletions
diff --git a/3862/CH8/EX8.1/Ex8_1.sce b/3862/CH8/EX8.1/Ex8_1.sce
new file mode 100644
index 000000000..b5268249f
--- /dev/null
+++ b/3862/CH8/EX8.1/Ex8_1.sce
@@ -0,0 +1,19 @@
+clear
+//
+
+//variable declaration
+
+P=(40000)               //Load,N
+E=(200000)              //Modulus of elasticity for steel,N/mm^2
+L=500              //length of circular rod,mm
+d=(16)               //diameter of rod,mm
+
+A=(%pi*((d**2)))/4   //sectional area** mm^2
+p=P/A                 //stress, N/mm^2
+e=p/E                 //strain
+delta=(P*L)/(A*E)     //Elongation,mm
+
+printf("\n sectional area= %0.2f  mm^2",A)
+printf("\n stress= %0.2f  N/mm^2",p)
+printf("\n strain= %0.10f ",e)
+printf("\n Elongation= %0.3f  mm",delta)