1 files changed, 20 insertions, 0 deletions
diff --git a/3718/CH3/EX3.13/Ex3_13.sce b/3718/CH3/EX3.13/Ex3_13.sce
new file mode 100644
index 000000000..66fcd25d4
--- /dev/null
+++ b/3718/CH3/EX3.13/Ex3_13.sce
@@ -0,0 +1,20 @@
+//Chapter 3: Thermodynamic and Chemical Equilibrium
+//Problem: 13
+clc;
+
+//Declaration of Constants
+l_v = 101            //in cal /g, Latent headt of vap.
+mwt = 78            // molecular weight of benzene
+
+//Declaration of Variable
+m = 2
+Tb = 80.2          // C, boiling point of benzene
+
+// Solution
+Tb = Tb + 273      // K
+d_h = l_v * mwt
+d_s = d_h / Tb
+d_g = d_h - Tb * d_s
+
+mprintf("d_s = %.2f cal / K\n",d_s)
+mprintf(" d_g = d_a = %d", d_g)