diff options
Diffstat (limited to '2504/CH6/EX6.3/6_3.sce')
-rwxr-xr-x | 2504/CH6/EX6.3/6_3.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/2504/CH6/EX6.3/6_3.sce b/2504/CH6/EX6.3/6_3.sce new file mode 100755 index 000000000..a1e1604b9 --- /dev/null +++ b/2504/CH6/EX6.3/6_3.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+clear
+r=1.4
+g= 32.2 //ft/sec^2
+R= 53.3 //lbf ft/lbm
+T1= 760 //R
+p2= 2 //lbf/in^2
+p1= 3 //lbf/in^2
+//CALCULATIONS
+V2= sqrt(2*r*R*g*T1*(1-(p2/p1)^((r-1)/r))/(r-1))
+//RESULTS
+printf ('Velocity in working section = %.f ft/sec',V2)
|