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

The spring will be compressed by 100.2 mm