summaryrefslogtreecommitdiff
path: root/2417/CH6/EX6.37
diff options
context:
space:
mode:
Diffstat (limited to '2417/CH6/EX6.37')
-rwxr-xr-x2417/CH6/EX6.37/Ex6_37.sce13
1 files changed, 13 insertions, 0 deletions
diff --git a/2417/CH6/EX6.37/Ex6_37.sce b/2417/CH6/EX6.37/Ex6_37.sce
new file mode 100755
index 000000000..5cc863aab
--- /dev/null
+++ b/2417/CH6/EX6.37/Ex6_37.sce
@@ -0,0 +1,13 @@
+clear;
+clc;
+printf("\t\t\tProblem Number 6.37\n\n\n");
+// Chapter 6: The Ideal Gas
+// Problem 6.37 (page no. 288)
+// Solution
+
+T=200+460; //Fahrenheit temperature converted to absolute temperature //unit:R
+V=1500; //ft/s //the local velocity
+Va=49.0*sqrt(T); //velocity of sound air at 200 F //unit:ft/s
+printf("The velocity of sound air at 200 F is %f ft/s\n",Va);
+M=V/Va; //The Mach number=the local velocity/velocity of sound //unitless
+printf("The Mach number is %f\n",M);