1 files changed, 19 insertions, 0 deletions
diff --git a/551/CH5/EX5.26/26.sce b/551/CH5/EX5.26/26.sce
new file mode 100755
index 000000000..0110b683f
--- /dev/null
+++ b/551/CH5/EX5.26/26.sce
@@ -0,0 +1,19 @@
+clc
+m=0.04; //kg
+p1=1*10^5; //N/m^2
+T1=293; //K
+p2=9*10^5; //N/m^2
+V2=0.003; //m^3
+cp=0.88; //kJ/kg.K
+R0=8314;
+M=44;
+
+R=R0/M;
+T2=p2*V2/m/R;
+ds_2A=R/10^3*log(p2/p1);
+ds_1A=cp*log(T2/T1);
+ds_21=ds_2A - ds_1A;
+dS_21=m*ds_21;
+disp("Decrease in entropy=")
+disp(dS_21)
+disp("kJ/K")
+\ No newline at end of file