1 files changed, 17 insertions, 0 deletions
diff --git a/1019/CH4/EX4.17/Example_4_17.sce b/1019/CH4/EX4.17/Example_4_17.sce
new file mode 100644
index 000000000..5ec59146c
--- /dev/null
+++ b/1019/CH4/EX4.17/Example_4_17.sce
@@ -0,0 +1,17 @@
+//Example 4.14
+clear;
+clc;
+
+//Given
+R=8.314;// gas constant in J K^-1 mol^-1
+T=273;//temperature in K
+V1=1;//initial volume in dm^3
+V2=50;//final volume in dm^3
+a=6.5;// Van der Waals constant in atm dm^6 mol^-2
+b=0.056;//Van der Waals constant in dm^3 mol^-1
+
+//to determine entropy change
+qrev=R*T*log((V2-b)/(V1-b));
+delS=qrev/T;//entropy change in J K^-1 mol^-1
+mprintf('Change in entropy = %f J K^-1 mol^-1',delS);
+//end
+\ No newline at end of file