summaryrefslogtreecommitdiff
path: root/1466/CH2/EX2.4/2_4.sce
blob: 9f06f98f4c6536d852f823b9a62a2327b8edf7ee (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

clc
//initialisation of variables
d= 6 //ft
l= 4 //ft
W= 2500 //lb
Wt= 500 //lb
cg= 1.5 //ft
d1= 64 //lb/ft^3
//CALCULATIONS
w1= W+Wt
V= w1/d1
D= V/(%pi*(d^2/4))
hb= D/2
BG= (%pi*d^4)/(64*V)
hg= BG+hb
x= ((w1*hg)-(W*cg))/Wt
//RESULTS
printf (' Maximum height c.g above the bottom= %.2f ft ',x)