summaryrefslogtreecommitdiff
path: root/3886/CH17/EX17.1/17_1.sce
blob: 3dcb67a12b90f87dde5b7a5ff10977a0a55928a9 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//glass marble
//refer fig. 17.1
g=9.81  //m/sec^2
//applying kinematic equations
//velocity with which marble strikes the floor Vm
Vm=sqrt(2*g*10)  //m/sec (downward)
//applying kinematic equations
//Velocity of rebound Vr
Vr=sqrt(2*g*8)  //m/sec  (upward)
//Taking upward direction as positive and applying impulse momentum equation
//Impulse I
I=(0.2*(12.52+14.007))/9.81  //N-sec
//average force F
F=0.541*10 //N
printf("\nImpulse=%.3f N-sec\nF=%.2f N",I,F)