 
--> exec('E:\My program EM\15. DAlemberts principle\15.8.sce', -1)

a=1.9947 m/sec^2
T=49.60 N