diff options
Diffstat (limited to '172/CH16')
-rwxr-xr-x | 172/CH16/EX16.2/ex2.sce | 33 | ||||
-rwxr-xr-x | 172/CH16/EX16.3/ex3.sce | 13 |
2 files changed, 46 insertions, 0 deletions
diff --git a/172/CH16/EX16.2/ex2.sce b/172/CH16/EX16.2/ex2.sce new file mode 100755 index 000000000..bd10a909d --- /dev/null +++ b/172/CH16/EX16.2/ex2.sce @@ -0,0 +1,33 @@ +//ques2
+//to determine change in gibbs free energy
+clear
+clc
+//1-H2
+//2-O2
+//3-H2O
+
+//at T=298 K
+T1=298;//K
+Hf1=0;//Enthalpy of formation of H2 at 298 K
+Hf2=0;//Enthalpy of formation of O2 at 298 K
+Hf3=-241.826;//enthalpy of formation of H2O at 298 K in kJ
+dH=2*Hf1+Hf2-2*Hf3;//Change in enthalpy in kJ
+Sf1=130.678;//Entropy of H2 at 298 K n J/K
+Sf2=205.148;//Entropy of O2 at 298 K in J/K
+Sf3=188.834;//entropy of H2O at 298 K in J/K
+dS=2*Sf1+Sf2-2*Sf3;//Change in entropy in J/K
+dG1=dH-T1*dS/1000;//change n gibbs free energy in kJ
+printf(' Change in gibbs free energy at %.0f K = %.3f kJ \n' ,T1,dG1);
+
+//at T=2000 K
+T2=2000;//K
+Hf1=52.942-0;//Enthalpy of formation of H2 at 2000 K
+Hf2=59.176-0;//Enthalpy of formation of O2 at 2000 K
+Hf3=-241.826+72.788;//enthalpy of formation of H2O at 2000 K in kJ
+dH=2*Hf1+Hf2-2*Hf3;//Change in enthalpy in kJ
+Sf1=188.419;//Entropy of H2 at 2000 K n J/K
+Sf2=268.748;//Entropy of O2 at 2000 K in J/K
+Sf3=264.769;//entropy of H2O at 2000 K in J/K
+dS=2*Sf1+Sf2-2*Sf3;//Change in entropy in J/K
+dG2=dH-T2*dS/1000;//change n gibbs free energy in kJ
+printf(' Change in gibbs free energy at %.0f K = %.3f kJ ' ,T2,dG2);
\ No newline at end of file diff --git a/172/CH16/EX16.3/ex3.sce b/172/CH16/EX16.3/ex3.sce new file mode 100755 index 000000000..01cc047eb --- /dev/null +++ b/172/CH16/EX16.3/ex3.sce @@ -0,0 +1,13 @@ +//ques3
+//calculating equilibrium constant
+clear
+clc
+dG1=-457.166;//change in gibbs free energy at temp 298 K from example2 in kJ
+dG2=-271.040;;//change in gibbs free energy at temp 2000 K from example2 n kJ
+T1=298;//K
+T2=2000;//K
+R=8.3145;//gas constant
+K1=dG1*1000/(R*T1);
+K2=dG2*1000/(R*T2);
+printf('Equilibrium constant at %.0f K = %.3f \n',T1,K1);
+printf(' Equilibrium constant at %.0f K = %.3f \n',T2,K2);
\ No newline at end of file |