--> exec('E:\My program EM\7. Transmission of power\7.8.sce', -1) maximum power P=21.085 kW