path: root/1460/CH4/EX4.6/4_6.sce

clc
//Initialization of variables
hp=10000 //hp
v=100 //lbm/sec
//calculations
W=hp*550/v
enthalpy=W/778
//results
printf("Decrease in stagnation enthalpy= %.1f B/lbm",enthalpy)