// problem 2.8
h1=0.05
h2=0.015
s=41/40
l=h1/(s-1)
w1=25
// applying bakance in vertical direction
w=w1*(l+h1)/(h2)
disp(w,"weight of ship in in N")