summaryrefslogtreecommitdiff
path: root/24/CH9/EX9.6/Example9_6.sce
blob: ae37b0b79c2873ae910d9576bdeba2223621ed04 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Given that
M = 1  //(say)to get the answer directly
Vi = 2100  //in km/h
//initial momentum
Pi = M* Vi
Vrel = 500  //in km/h

//Sample Problem 9-6
printf("**Sample Problem 9-6**\n")
//Assuming Vf as the final velocity of the hauler
Vf = poly(0, 'Vf')
Pf = 0.20*M*(Vf - Vrel) + (M - 0.20*M)*Vf
p = Pi - Pf
Vf = roots(p)
printf("The final velocity of the hauler is %dkm/h", Vf)