From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 2417/CH6/EX6.36/Ex6_36.sce | 20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)
 create mode 100755 2417/CH6/EX6.36/Ex6_36.sce

(limited to '2417/CH6/EX6.36')

diff --git a/2417/CH6/EX6.36/Ex6_36.sce b/2417/CH6/EX6.36/Ex6_36.sce
new file mode 100755
index 000000000..acc6f34b1
--- /dev/null
+++ b/2417/CH6/EX6.36/Ex6_36.sce
@@ -0,0 +1,20 @@
+clear;
+clc;
+printf("\t\t\tProblem Number 6.36\n\n\n");
+// Chapter 6: The Ideal Gas
+// Problem 6.36 (page no. 288) 
+// Solution
+
+T=1000+460; //Fahrenheit temperature converted to absolute temperature
+//The velocity of sound in air at 1000 F is
+Va=49.0*sqrt(T); //velocity //ft/s
+printf("The velocity of sound air at 1000 F is %f ft/s\n",Va);
+//Hydrogen has a specific heat ratio of 1.41 and R=766.53.Therefore,
+khydrogen=1.41; //specific heats ratio for air
+kair=1.40; //specific heats ratio for air
+Rhydrogen=766.53; //gas constant //ft*lbf/lbm*R
+Rair=53.36; //gas constant //ft*lbf/lbm*R
+// Vahydrogen/Vaair = sqrt((Rhydrogen*khydrogen)/(Rair*kair))
+//rearranging,
+Vahydrogen=Va*sqrt((Rhydrogen*khydrogen)/(Rair*kair)); //The velocity of sound in hydrogen at 1000 F //unit:ft/s
+printf("The velocity of sound in hydrogen at 1000 F is %f ft/s\n",Vahydrogen);
-- 
cgit