summaryrefslogtreecommitdiff
path: root/1484/CH2/EX2.10/2_10.sce
blob: 03ac32082c358c6d29ff2ae102df85ebcc2a451f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
clc 
//initialisation of variables
l= 91 //ft
w= 30 //ft
h= 6 //ft
W= 40 //tons
a= 3 //degrees
cg= 3 //ft
d= 4 //ft
W1= 60 //tons
cg1= 1 //ft
//CALCULATIONS
W2= (l*w*d*64/2240)-W1
y= (W2*(h/2)+W1*(cg+d))/(l*w*d*64/2240)
BG= y-(d/2)
BM= l*w^3/(12*l*w*d)
GM= BM-BG
dx= GM*l*w*d*64*tand(a)/(60*2240)
//RESULTS
printf ('maximum distance through which the load can be shifted= %.1f ft ',dx)