From 7bc77cb1ed33745c720952c92b3b2747c5cbf2df Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Sat, 3 Feb 2018 11:01:52 +0530
Subject: Added new code

---
 3886/CH8/EX8.1/8_1.sce | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 3886/CH8/EX8.1/8_1.sce

(limited to '3886/CH8/EX8.1/8_1.sce')

diff --git a/3886/CH8/EX8.1/8_1.sce b/3886/CH8/EX8.1/8_1.sce
new file mode 100644
index 000000000..f70b4fc26
--- /dev/null
+++ b/3886/CH8/EX8.1/8_1.sce
@@ -0,0 +1,12 @@
+//Resultant of system
+//Refer fig. 8.5
+//Let E be the equilibriant
+//using virtual work principle
+//-E*cosd(theta)=50*cosd(45)+80*cosd(25)+70*cosd(50)=152.86 N
+//-E*sind(theta)=-50*sind(45)+80*sind(25)+70*sind(50)=52.07*sind(25)
+//Thus
+a=152.86  //N  (R*cosd(theta))
+b=52.07  //N  (R*sind(theta))
+R=sqrt(a^2+b^2)  //N
+theta=atand(b/a)  //degree
+printf("Resultant R=%.2f N inclined at theta=%.2f degree w.r.t positive x-axis",R,theta)
-- 
cgit