summaryrefslogtreecommitdiff
path: root/548/CH9/EX9.3/9_03.sce
blob: 1c5a310309043e0bb98b87870c873c7bb88ded87 (plain)
1
2
3
4
5
6
7
pathname=get_absolute_file_path('9_03.sce')
filename=pathname+filesep()+'9_03data.sci'
exec(filename)
T=Mdot*(Ve-V)+(Pe-P)*Ae;
disp(T,"T=","T=Mdot*(Ve-V)+(Pe-P)*Ae","Thrust of the turbojet T:")
printf("\Answer:\n")
printf("\n\Mean effective pressure : %f N\n\n",T)