1 files changed, 19 insertions, 0 deletions
diff --git a/1571/CH8/EX8.14/Chapter8_Example14.sce b/1571/CH8/EX8.14/Chapter8_Example14.sce
new file mode 100755
index 000000000..948975211
--- /dev/null
+++ b/1571/CH8/EX8.14/Chapter8_Example14.sce
@@ -0,0 +1,19 @@
+clc
+clear
+
+//INPUT
+v1=10^3;//inital volume in cc
+v2=2*v1;//final volume in cc
+p1=76*13.6*981;//pressure in dyne/sq.cm
+t1=273;//intial temperature in K
+d=1.29;//density of the gas gm/lit
+cv=0.168;//specific heat at constant volume in cal/gm
+
+//CALCULATIONS
+t2=(v2/v1)*t1;//final temperature in K
+r=0.068;//universal gas constant in cal
+cp=cv+r;//specific heat at constant pressure in cal
+q=d*cp*(t2-t1);//heat supplied in cal
+
+//OUTPUT
+mprintf('the heat supplied to the gas is %3.2f cal',q)