summaryrefslogtreecommitdiff
path: root/3862/CH5/EX5.5/Ex5_5.sce
diff options
context:
space:
mode:
authorprashantsinalkar2018-02-03 11:01:52 +0530
committerprashantsinalkar2018-02-03 11:01:52 +0530
commit7bc77cb1ed33745c720952c92b3b2747c5cbf2df (patch)
tree449d555969bfd7befe906877abab098c6e63a0e8 /3862/CH5/EX5.5/Ex5_5.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 '3862/CH5/EX5.5/Ex5_5.sce')
-rw-r--r--3862/CH5/EX5.5/Ex5_5.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/3862/CH5/EX5.5/Ex5_5.sce b/3862/CH5/EX5.5/Ex5_5.sce
new file mode 100644
index 000000000..cff5d1ab8
--- /dev/null
+++ b/3862/CH5/EX5.5/Ex5_5.sce
@@ -0,0 +1,16 @@
+clear
+//
+Wl=750.0 //weight of lower block
+Wu=500.0 //weight of upper block
+o1=60.0*3.14/180.0 //angle of inclined plane
+o2=30.0 *3.14/180.0 // anlge at which pull is applied
+u=0.2 //coefficient of friction
+//for 750 N block
+//Σ Forces normal to the plane = 0
+N1=Wl*cos(o1)
+F1=u*N1
+//Σ Forces parallel to the plane = 0
+T=F1+Wl*sin(o1)
+//Σ Forces horizontal to the plane = 0
+P=(T+u*Wu)/(cos(o2)+u*sin(o2))
+printf("\n %0.3f N",P)