--> exec('E:\My program EM\16. Work energy method\16.12.sce', -1)

v=5.061 m/sec
s=721.430 mm