diff options
Diffstat (limited to '3862/CH5/EX5.13/Ex5_13.sce')
| -rw-r--r-- | 3862/CH5/EX5.13/Ex5_13.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3862/CH5/EX5.13/Ex5_13.sce b/3862/CH5/EX5.13/Ex5_13.sce new file mode 100644 index 000000000..bee2a03f5 --- /dev/null +++ b/3862/CH5/EX5.13/Ex5_13.sce @@ -0,0 +1,15 @@ +clear +// +n=1.25 //number of turns +o=2*3.14*n //angle of contact +u=0.3 //coefficient of friction +t=600.0 //force at the other end of the rope +//if the impending motion of the weight be downward. +T2=t*%e**(u*o) +W=T2 +printf("Maximum weight is %f",W) +printf("\n answer in textbook is wrong") +//if the impending motion of weight be upwards +T1=t*%e**(-1*u*o) +W=T1 +printf("\n Minimum weight is %f",W) |