diff options
Diffstat (limited to '3831/CH16/EX16.5/Ex16_5.sce')
| -rw-r--r-- | 3831/CH16/EX16.5/Ex16_5.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/3831/CH16/EX16.5/Ex16_5.sce b/3831/CH16/EX16.5/Ex16_5.sce new file mode 100644 index 000000000..4f5044cec --- /dev/null +++ b/3831/CH16/EX16.5/Ex16_5.sce @@ -0,0 +1,17 @@ +// Example 16_5
+clc;funcprot(0);
+// Given data
+T=-20.0+273.15;// K
+p=0.500;// atm
+M=0.850;// The Mach number
+k=1.40;// The specific heat ratio
+R=286;// J/kg.K
+g_c=1;// The gravitational constant
+
+// Solution
+V=M*sqrt(k*g_c*R*T);// m/s
+T_os=T*(1+(((k-1)*M^2)/2));// K
+T_os=T_os-273.15;// °C
+p_os=p*(1+(((k-1)*M^2)/2))^(k/(k-1));// atm
+p_os=p_os*1.013*10^2;// kPa
+printf("\nThe aircraft’s velocity,V=%3.0f m/s \nThe isentropic stagnation temperature,T_os=%2.1f°C \nThe isentropic stagnation pressure,p_os=%2.1f KPa",V,T_os,p_os);
|