summaryrefslogtreecommitdiff
path: root/2417/CH6/EX6.29/Ex6_29.sce
diff options
context:
space:
mode:
Diffstat (limited to '2417/CH6/EX6.29/Ex6_29.sce')
-rwxr-xr-x2417/CH6/EX6.29/Ex6_29.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/2417/CH6/EX6.29/Ex6_29.sce b/2417/CH6/EX6.29/Ex6_29.sce
new file mode 100755
index 000000000..64c261a66
--- /dev/null
+++ b/2417/CH6/EX6.29/Ex6_29.sce
@@ -0,0 +1,19 @@
+clear;
+clc;
+printf("\t\t\tProblem Number 6.29\n\n\n");
+// Chapter 6: The Ideal Gas
+// Problem 6.29 (page no. 274)
+// Solution
+
+//data given
+T1=1000; //absolute initial temperature //unit:R
+p2=1; //unit:atm //absolute final pressure
+p1=5; //unit:atm //absolute initial pressure
+J=778; //conversion factor
+R=1545/29; //moleculer weight=29 //Unit:ft*lbf/lbm*R //constant of proportionality
+k=1.4; //k=cp/cv //ratio of specific heats
+//From the equation,
+T2=T1*((p2/p1)^((k-1)/k)); //Unit:R //The absolute final temperature
+printf("The absolute final temperature is %f R\n",T2);
+work=(R*(T2-T1))/(J*(1-k)); //Btu/lbm //The work done by air(out)
+printf("The work done by air is %f Btu/lbm(out)\n",work)