1 files changed, 7 insertions, 0 deletions
diff --git a/548/CH9/EX9.3/9_03.sce b/548/CH9/EX9.3/9_03.sce
new file mode 100755
index 000000000..1c5a31030
--- /dev/null
+++ b/548/CH9/EX9.3/9_03.sce
@@ -0,0 +1,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)