1 files changed, 14 insertions, 0 deletions
diff --git a/551/CH5/EX5.47/47.sce b/551/CH5/EX5.47/47.sce
new file mode 100755
index 000000000..5baf3735a
--- /dev/null
+++ b/551/CH5/EX5.47/47.sce
@@ -0,0 +1,14 @@
+clc
+m1=3; //kg
+m2=4; //kg
+T0=273; //K
+T1=80+273; //K
+T2=15+273; //K
+c_pw=4.187; //kJ/kgK
+tm=(m1*T1 + m2*T2)/(m1+m2);
+Si=m1*c_pw*log(T1/T0) + m2*c_pw*log(T2/T0);
+Sf=(m1+m2)*c_pw*log(tm/T0);
+dS=Sf-Si;
+disp("Net change in entropy =")
+disp(dS)
+disp("kJ/K")
+\ No newline at end of file