summaryrefslogtreecommitdiff
path: root/3862/CH5/EX5.12/Ex5_12.sce
blob: 259ca17f72d4d0941fd5279f40d269fba8c640ba (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clear
//
o=45.0*3.14/180.0       //angle of inclination 
u=0.5                        //coefficient of friction
r=1.5                    //ratio of mans weight to ladders weight
o1=45.0*%pi/180.0           //angle of inclination
//from law of friction
//Fa = μNa
//Fb = μNb
//Fa – Nb = 0 
//Na + Fb = W + r W
//ΣMA = 0
o=(((u*u+u)*(1+r)/((1+u)))-1.0/2.0)/r
printf("\n length will %0.3f  times",o)