summaryrefslogtreecommitdiff
path: root/3876/CH13/EX13.10/Ex13_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '3876/CH13/EX13.10/Ex13_10.sce')
-rw-r--r--3876/CH13/EX13.10/Ex13_10.sce18
1 files changed, 18 insertions, 0 deletions
diff --git a/3876/CH13/EX13.10/Ex13_10.sce b/3876/CH13/EX13.10/Ex13_10.sce
new file mode 100644
index 000000000..dd9d94978
--- /dev/null
+++ b/3876/CH13/EX13.10/Ex13_10.sce
@@ -0,0 +1,18 @@
+//Chapter 13 Thermodynamics Entropy and Free Energy
+
+clc;
+clear;
+
+//Initialisation of Variables
+F= 18430 //cal
+F1= -31350 //cal
+F2= 26224 //cal
+R= 1.99 //cal/mole K
+T= 25 //C
+
+//CALCULATIONS
+F3= F+F1+F2
+Ksp= 10**(-F3/(R*(273+T)*2.303))
+
+//RESULTS
+mprintf("Solubility product = %.2e",Ksp)