1 files changed, 23 insertions, 0 deletions
diff --git a/3482/CH4/EX4.5/Ex4_5.sce b/3482/CH4/EX4.5/Ex4_5.sce
new file mode 100644
index 000000000..49ea8daca
--- /dev/null
+++ b/3482/CH4/EX4.5/Ex4_5.sce
@@ -0,0 +1,23 @@
+clc;
+//page 169
+
+//At equillibrium  +sum(Mo)=0,
+//s=r*theta;
+//F=k*s=k*r*theta;
+k=45;//N/mm
+r=75;//mm
+W=1800;//N
+l=200;//mm
+
+
+// trial and error 
+printf("Probable answers by trial and error method are \n");
+for i=0:0.1:%pi/2 // from 0 to 90 degrees
+
+difference=(sin(i)-k*r^2*(i)/(W*l));
+if difference<0.01 then   // Approximation
+   theta=i;
+   theta=theta*180/%pi;//Degrees , conversion into degrees
+printf("Theta=%.2f degrees\n",theta); 
+end
+end