1 files changed, 15 insertions, 0 deletions
diff --git a/680/CH8/EX8.08/8_08.sce b/680/CH8/EX8.08/8_08.sce
new file mode 100755
index 000000000..8a2a5f27d
--- /dev/null
+++ b/680/CH8/EX8.08/8_08.sce
@@ -0,0 +1,15 @@
+//Problem 8.08:
+
+//initializing the variables:
+T1 = 100; // in deg C
+P = 101370; // in Pa
+dH100 = 2256.9; // in J/g
+T2 = 200; // in deg C
+
+//calculation:
+Tr100 = (T1 + 273)/647
+Tr200 = (T2 + 273)/647
+dH200 = dH100*((1 - Tr200)/(1 - Tr100))^0.38
+
+printf("\n\nResult\n\n")
+printf("\n the enthalpy of vaporization is %.0f J/g",dH200)
+\ No newline at end of file