1 files changed, 18 insertions, 0 deletions
diff --git a/2024/CH9/EX9.3/9_3.sce b/2024/CH9/EX9.3/9_3.sce
new file mode 100755
index 000000000..ec7847d49
--- /dev/null
+++ b/2024/CH9/EX9.3/9_3.sce
@@ -0,0 +1,18 @@
+clc
+//Initialization of variables
+rpt=0.569
+b=0.8
+p1=50 //psia
+cp=0.24
+T1=520 //R
+k=1.4
+v2=12.2
+v1=3.86
+m=1
+//calculations
+pt=p1*rpt
+Vtrev=223.77*sqrt(cp*T1*(1- rpt^((k-1)/k)) /(1- b^4 *(v1/v2)^2))
+vt=(p1/pt)^(1/k) *v1
+At=m*vt/Vtrev
+//results
+printf("Area of throat = %.5f ft^2",At)