1 files changed, 19 insertions, 0 deletions
diff --git a/2735/CH12/EX12.1/Ex12_1.sce b/2735/CH12/EX12.1/Ex12_1.sce
new file mode 100755
index 000000000..d52728238
--- /dev/null
+++ b/2735/CH12/EX12.1/Ex12_1.sce
@@ -0,0 +1,19 @@
+clc
+clear
+//Initialization of variables
+p1=100 //psia
+p2=14.7 //psia
+k=1.4
+T1=700 //R
+R=10.73/29
+V=50
+cv=0.171
+cp=0.24
+R2=1.986/29
+//calculations
+T2=T1/ (p1/p2)^((k-1)/k)
+m1=p1*V/(R*T1)
+m2=p2*V/(R*T2)
+Wrev= cv*(m1*T1 - m2*T2) - (m1-m2)*(T2)*cp
+//results
+printf("Work done in case 1 = %d Btu",Wrev)