1 files changed, 16 insertions, 16 deletions
diff --git a/278/CH4/EX4.18/ex_4_18.sce b/278/CH4/EX4.18/ex_4_18.sce
index 2250648fb..9394ffa60 100755
--- a/278/CH4/EX4.18/ex_4_18.sce
+++ b/278/CH4/EX4.18/ex_4_18.sce
@@ -1,17 +1,17 @@
-//find stress corresponding to max inst extesnion and value of unkown weight
-clc
-//solution
-//given
-h=10//mm//height thru which weigth fall
-l=3000//mm//length of bar
-A=600//mm^2//xsection area of bar
-dl=2//mm//change in length of bar
-E=200*10^3//N/mm^2
-//let f be stress
-f=(E*dl)/l//N/mm^2
-//let w be value of unknown weigth
-//we know f=(W/A)*[1+sqrt{1+(2*h*A*E/W/l)}]
-//400/3=(W/600)*[1+sqrt{1+(2*10*600*200*1000/W/3000)}]
-W=6400*100/96//N
-printf("the stress induces is,%f N/mm^2\n",f)
+
+clc
+//solution
+//given
+h=10//mm//height thru which weigth fall
+l=3000//mm//length of bar
+A=600//mm^2//xsection area of bar
+dl=2//mm//change in length of bar
+E=200*10^3//N/mm^2
+//let f be stress
+f=(E*dl)/l//N/mm^2
+//let w be value of unknown weigth
+//we know f=(W/A)*[1+sqrt{1+(2*h*A*E/W/l)}]
+//400/3=(W/600)*[1+sqrt{1+(2*10*600*200*1000/W/3000)}]
+W=6400*100/96//N
+printf("the stress induces is,%f N/mm^2\n",f)
 printf("the unknown weigth is,%f N",W)
 \ No newline at end of file