initial commit / add all books

1 files changed, 18 insertions, 0 deletions

diff --git a/2417/CH6/EX6.31/Ex6_31.sce b/2417/CH6/EX6.31/Ex6_31.sce
new file mode 100755
index 000000000..3409ecb82
--- /dev/null
+++ b/2417/CH6/EX6.31/Ex6_31.sce
@@ -0,0 +1,18 @@
+clear;

+clc;

+printf("\t\t\tProblem Number 6.31\n\n\n");

+// Chapter 6: The Ideal Gas

+// Problem 6.31 (page no. 275) 

+// Solution

+

+//data given

+T1=800+273; //Celsius temperature converted to Kelvin //initial temperature

+T2=500+273; //Celsius temperature converted to Kelvin //final temperature

+p2=1; //atm //absolute final pressure

+p1=5; //atm //absolute initial pressure

+//A gas expands isentropically

+//From the equation,

+//T2/T1=((p2/p1)^((k-1)/k));

+//rearranging,

+k=inv(1-((log(T2/T1)/log(p2/p1)))); //k=cp/cv //Ratio of specific heats

+printf("Ratio of specific heats (k) is %f\n",k);