summaryrefslogtreecommitdiff
path: root/3886/CH15/EX15.7/15_7.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3886/CH15/EX15.7/15_7.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 '3886/CH15/EX15.7/15_7.sce')
-rw-r--r--3886/CH15/EX15.7/15_7.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/3886/CH15/EX15.7/15_7.sce b/3886/CH15/EX15.7/15_7.sce
new file mode 100644
index 000000000..1914ea74f
--- /dev/null
+++ b/3886/CH15/EX15.7/15_7.sce
@@ -0,0 +1,21 @@
+//Two weights connected by weight
+//refer fig.15.9 (a) and (b)
+//Consider dynamic equilibrium of 200 N Weight
+N1=200 //N
+mu=0.3
+//From law of friction
+F1=mu*N1 //N
+//applying equilibrium condition
+//T1-(200*a)/9.81=60
+//Consider 800N body
+N2=800 //N
+//From Law of friction
+F2=mu*N2 //N
+//applying equilibrium condition
+//T+(800*a)/9.81=160 N
+//Solving
+a=((160-60)*9.81)/(200+800) //m/sec^2
+T=160-((800*a)/(9.81)) //N
+printf("\na=%.3f m/sec^2\nT=%.2f N",a,T)
+
+