initial commit / add all books

15 files changed, 341 insertions, 0 deletions

diff --git a/944/CH6/EX6.10/example6_10_TACC.sce b/944/CH6/EX6.10/example6_10_TACC.sce
new file mode 100755
index 000000000..d295ee754
--- /dev/null
+++ b/944/CH6/EX6.10/example6_10_TACC.sce
@@ -0,0 +1,27 @@
+//example 6.10

+

+clear;

+clc;

+

+//Given:

+m1=0.03;//mass of CO2(g)[gm]

+w1=44.01;//molecular weight of CO2(g)[gm/mol]

+m2=250;//mass of water[gm]

+w2=18.02;//molecular weight of water[gm/mol]

+k=1.25*10^6;//Henry's law constant[Torr]

+T=298;//Temperature[K]

+

+//To find the partial pressure of CO2 gas 

+n1=m1/w1;//no. of moles of CO2

+n2=m2/w2;//no. of moles of water

+x1=n1/(n1+n2);//mole fraction of CO2

+Pco2=k*x1;//Partial pressure of CO2[Torr]

+printf("The partial pressure of CO2 gas is %f Torr",Pco2);

+

+

+

+

+

+

+

+

diff --git a/944/CH6/EX6.11/example6_11_TACC.sce b/944/CH6/EX6.11/example6_11_TACC.sce
new file mode 100755
index 000000000..9996f489f
--- /dev/null
+++ b/944/CH6/EX6.11/example6_11_TACC.sce
@@ -0,0 +1,26 @@
+//example 6.11

+

+clear;

+clc;

+

+//Given:

+W=1000;//Total mass of a solution[gm]

+x1=0.5;//mole fraction of Chloroform

+x2=0.5;//mole fraction of Acetone

+V1m=80.235;//Partial molar volume of chloroform[cm3/mol]

+V2m=74.166;//Partial molar volume of Acetone[cm3/mol]

+M1=119.59;//molecular weight of chloroform[gm/mol]

+M2=58;//molecular weight of Acetone[gm/mol]

+

+//To find the Volume of the solution

+nT=W/(x1*M1+x2*M2);//Total no. of moles

+V=nT*(x1*V1m+x2*V2m);//Total volume[cm3]

+printf("The volume of the solution is %f cm3",V); 

+

+

+

+

+

+

+

+

diff --git a/944/CH6/EX6.12/example6_12_TACC.sce b/944/CH6/EX6.12/example6_12_TACC.sce
new file mode 100755
index 000000000..ac272095f
--- /dev/null
+++ b/944/CH6/EX6.12/example6_12_TACC.sce
@@ -0,0 +1,12 @@
+//example 6.12

+

+clear;

+clc;

+

+//Given:

+x1=0.5;//mole fraction of chloroform

+x2=0.5;//mole fraction of p-xylene

+T=298;//Temperature[K]

+//to find the excess volume 

+Ve=x1*x2*[0.585+0.085*(x1-x2)-0.165*(x1-x2)^2];//Excess volume measured by using a dilatometer

+printf("Ve/(cm3.mol^-1) = %f ",Ve);
\ No newline at end of file
diff --git a/944/CH6/EX6.14/example6_14_TACC.sce b/944/CH6/EX6.14/example6_14_TACC.sce
new file mode 100755
index 000000000..008ea9ba4
--- /dev/null
+++ b/944/CH6/EX6.14/example6_14_TACC.sce
@@ -0,0 +1,34 @@
+//example 6.14

+

+clear;

+clc;

+

+//Given:

+m1=0.01;//molality[m]

+v11=1;

+v12=2;

+Y1=0.71;

+m2=0.005;//molality[m]

+v21=1;

+v22=1;

+Y2=0.53;

+

+

+//To find the activity , molality of the electrolytes

+v1=(v11)+(v12);

+v2=(v21)+(v22);

+a1=(m1^v1)*(v11^v11)*(v12^v12)*(Y1^v1);

+a2=(m2^v2)*(v21^v21)*(v22^v22)*(Y2^v2);

+x=1/v1;

+a1m=a1^x;

+m1m=m1*(v11^v11*v12^v12)^x;//molality[m]

+y=1/v2;

+m2m=m2*(v21*v21*v22^v22)^y;//molality[m]

+a2m=a2^y;

+disp(a1,'The activity of the electrolyte ZnCl2 is');

+disp(a1m,'The mean activity of ZnCl2 is ');

+disp(m1m,'The mean molality of ZnCl2 in [m] ');

+disp(a2,'The activity of the electrolyte CuSO4 is ');

+disp(a2m,'The mean activity of CuSO4 is ');

+disp(m2m,'The mean molality of CuSO4 in [m] ');

+

diff --git a/944/CH6/EX6.15/example6_15_TACC.sce b/944/CH6/EX6.15/example6_15_TACC.sce
new file mode 100755
index 000000000..a2cbc0056
--- /dev/null
+++ b/944/CH6/EX6.15/example6_15_TACC.sce
@@ -0,0 +1,16 @@
+//example 6.15

+

+clear;

+clc;

+

+//Given:

+m2=3;//mass of the sucrose[gm]

+m1=0.1;//mass of water [Kg]

+Kf=1.86;//cryoscopic constant of water[K*Kg/mol]

+dTf=0.16;//Lowering in freezing point[K]

+

+//To find the molecular weight of sucrose

+a=m1*dTf;

+b=Kf*m2;

+M2=b/a;//molecular weight

+printf("M2=molecular weight ,    then M2=%f",M2); 
\ No newline at end of file
diff --git a/944/CH6/EX6.16/example6_16_TACC.sce b/944/CH6/EX6.16/example6_16_TACC.sce
new file mode 100755
index 000000000..fe7b2348d
--- /dev/null
+++ b/944/CH6/EX6.16/example6_16_TACC.sce
@@ -0,0 +1,18 @@
+//example 5.16

+

+clear;

+clc;

+

+//Given:

+dTf=0.088;//Lowering in freezing point[K]

+m2=0.45;//mass of sulphur[gm]

+m1=0.09955;//mass of benzene[gm]

+Kf=5.07;//cryoscopic constant for benzene[K*Kg/mol]

+

+//To find the molecular formula of sulphur

+a=m1*dTf;

+b=Kf*m2;

+M2=b/a;//molecular weight of sulphur

+printf("The molecular weight of sulphur is %f",M2);

+x=M2/32;//no. of sulphur atoms

+printf("\n The molecular formula of sulphur is S%f",x);
\ No newline at end of file
diff --git a/944/CH6/EX6.17/example6_17_TACC.sce b/944/CH6/EX6.17/example6_17_TACC.sce
new file mode 100755
index 000000000..4a2df57c2
--- /dev/null
+++ b/944/CH6/EX6.17/example6_17_TACC.sce
@@ -0,0 +1,26 @@
+//example 6.17

+

+clear;

+clc;

+

+//Given:

+m2=1.35;//mass of a macromolecule[gm]

+V=100;//volume of solution[cm^3]

+R=82;//Universal gas constant[atm.cm^3.K^-1]

+T=300;//Temperature[K]

+II=9.9;//osmotic pressure of the solution[cm]

+d=1;//density

+p=1013250;//Atmospheric pressure

+g=980.67;//gravitational field

+

+

+//To find the molar mass of macromolecule

+a=m2*R*T*p;

+b=V*9.9*d*g;

+M2=a/b;//molar mass of macromolecule

+printf(" M2 = molar mass of macromolecule , therefore M2 = %f g.mol^-1",M2);

+

+

+

+

+

diff --git a/944/CH6/EX6.18/example6_18_TACC.sce b/944/CH6/EX6.18/example6_18_TACC.sce
new file mode 100755
index 000000000..8a5cc5830
--- /dev/null
+++ b/944/CH6/EX6.18/example6_18_TACC.sce
@@ -0,0 +1,17 @@
+//example 6.18

+

+clear;

+clc;

+

+//Given:

+R=82;//Universal gas constant[atm.ml.K^-1.mol^-1]

+T=298;//Temperature[K]

+V=250;//volume of water[ml]

+m2=2.6;//mass of the protein

+M2=85000;//molar mass of protein[g.mol^-1]

+

+

+//To find the osmotic pressure of a solution

+n2=m2/M2;//no. of moles of protein

+II=(n2*R*T)/V;//Osmotic pressure of a solution[atm]

+printf("The osmotic pressure is %f atm ",II);

diff --git a/944/CH6/EX6.19/example6_19_TACC.sce b/944/CH6/EX6.19/example6_19_TACC.sce
new file mode 100755
index 000000000..712d4eeff
--- /dev/null
+++ b/944/CH6/EX6.19/example6_19_TACC.sce
@@ -0,0 +1,21 @@
+//example 6.19

+

+clear;

+clc;

+

+//Given:

+R=8.314;//Universal gas constant[J.K^-1.mol^-1]

+Tb=373.15;//Boiling point temperature[K]

+M1=0.018;// mass of water[kg]

+Hvap=40.7;//Enthalpy of vaporization[KJ.mol^-1]

+

+//To find the Ebullioscopic constant of water

+a=R*0.001*Tb^2*M1;

+b=Hvap;

+Kb=a/b;//Ebullioscopic constant of water[K.Kg.mol^-1]

+printf("The Ebullioscopic constant of water is %f K.Kg.mol-1",Kb);

+

+

+

+

+

diff --git a/944/CH6/EX6.2/example6_2_TACC.sce b/944/CH6/EX6.2/example6_2_TACC.sce
new file mode 100755
index 000000000..d549c654c
--- /dev/null
+++ b/944/CH6/EX6.2/example6_2_TACC.sce
@@ -0,0 +1,24 @@
+//example 6.2

+

+clear;

+clc;

+

+//Given:

+T=500;//Temperature[K]

+P=100;//Pressure[atm]

+a=3.61;//van der waals constant for CO2[atm.L^2.mol^-2]

+b=0.0429;//van der waals constant for CO2[L.mol^-1]

+R=0.082;//Universal gas constant[atm.K-1.mol^-1]

+

+//To find the molar volume of CO2

+x=b+(R*T/P);

+y=a/P;

+z=a*b/P;

+p2 = poly([-z y -x 1], 'Vm', 'c');

+t=roots(p2);

+printf("The value of molar volume of CO2 is %f L.mol^-1",t(3));

+

+

+

+

+

diff --git a/944/CH6/EX6.20/example6_20_TACC.sce b/944/CH6/EX6.20/example6_20_TACC.sce
new file mode 100755
index 000000000..ee330ae50
--- /dev/null
+++ b/944/CH6/EX6.20/example6_20_TACC.sce
@@ -0,0 +1,17 @@
+//example 6.20

+

+clear;

+clc;

+

+disp("CaF2(s)<=>CaF2(aq)<=>Ca+2(aq) + 2F-(aq)");

+

+//Given:

+Ksp=4*10^-11;//Solubility product of sparingly soluble salt CaF2

+

+//To find the value of activity coefficient

+x=Ksp/4;

+Cs=x^0.33;//Solubility 

+y=Cs^2;

+Y=(x/y)^0.33;//activity coefficient

+printf("The activity coefficient is %f ",Y);

+  
\ No newline at end of file
diff --git a/944/CH6/EX6.21/example6_21_TACC.sce b/944/CH6/EX6.21/example6_21_TACC.sce
new file mode 100755
index 000000000..d8ef30476
--- /dev/null
+++ b/944/CH6/EX6.21/example6_21_TACC.sce
@@ -0,0 +1,19 @@
+//example 6.21

+

+clear;

+clc;

+

+//Given:

+R=8.314;//Universal gas constant[J/K/mol]

+T=298;//Temperature[K]

+F=96500;//Faraday's constant

+Eo=0.98;//Standard e.m.f of the cell[Volts]

+E=1.16;//e.m.f of the cell[Volts]

+m=0.01;

+

+//To find the mean activity coefficient of ZnCl2 solution

+a=R*T;

+b=2*F;

+x=a/b;

+Y=exp((Eo-E-(x*log(4*m*m*m)))/(3*x));//mean activity coefficient

+printf("The mean activity coefficient is %f",Y);
\ No newline at end of file
diff --git a/944/CH6/EX6.22/example6_22_TACC.sce b/944/CH6/EX6.22/example6_22_TACC.sce
new file mode 100755
index 000000000..bccff608e
--- /dev/null
+++ b/944/CH6/EX6.22/example6_22_TACC.sce
@@ -0,0 +1,30 @@
+//example 6.22

+

+clear;

+clc;

+

+//Given:

+M1=0.01;//no. of moles of KCl

+M2=0.005;//no. of moles of MgCl2

+M3=0.002;//no. of moles of MgSO4

+M=0.1;//mass of water[Kg]

+z11=1;

+z12=1;

+z21=2;

+z22=1;

+z31=2;

+z32=2;

+

+//To find the ionic strength in a solution

+m1=M1/M;//molality of KCL[m]

+m2=M2/M;//molality of MgCl2[m]

+m3=M3/M;//molality of MgSO4[m]

+

+I=0.5*[(m1*z11^2+m1*z12^2+m2*z21^2+2*m2*z22^2+m3*z31^2+m3*z32^2)];//[mol/Kg]

+

+printf("The Ionic strength of a solution is %f mol/Kg",I);

+

+

+

+

+

diff --git a/944/CH6/EX6.23/example6_23_TACC.sce b/944/CH6/EX6.23/example6_23_TACC.sce
new file mode 100755
index 000000000..6d9180bcf
--- /dev/null
+++ b/944/CH6/EX6.23/example6_23_TACC.sce
@@ -0,0 +1,28 @@
+//example 6.23

+

+clear;

+clc;

+

+//Given:

+T=298;//Temperature[K]

+P=1;//pressure [atm]

+m=0.02;//Ionic strength of HCl solution in CH3OH[mol/Kg]

+E=32.6;//Di-electric constant

+d=0.787;//Density[gm/cm3]

+

+//To find the mean activity coefficient

+I=0.5*(0.02*1*1+0.02*1*1);//Ionic strength of HCl solution[mol/Kg]

+a=I*d;

+b=(E^3)*(298^3);

+x=(a/b)^0.5;

+Y=10^(-1.825*1000000*1*1*x);//mean activity coefficient

+printf("The mean activity coefficient is %f ",Y);

+

+

+

+

+

+

+

+

+

diff --git a/944/CH6/EX6.5/example6_5_TACC.sce b/944/CH6/EX6.5/example6_5_TACC.sce
new file mode 100755
index 000000000..f5842cfcb
--- /dev/null
+++ b/944/CH6/EX6.5/example6_5_TACC.sce
@@ -0,0 +1,26 @@
+//example 6.5

+

+clear;

+clc;

+

+//Given:

+b=0.0391;//Van der waals constant[dm3/mol]

+R=0.082;//Universal gas constant[dm3*atm/mol]

+P2=1000;//pressure [atm]

+P1=0;//pressure [atm]

+T=1273;//Temperature [K]

+

+//To find the fugacity and fugacity coefficient

+x=b*(P2-P1);

+y=R*T;

+fc=exp(x/y);//fugacity coefficient

+

+f=P2*fc;//fugacity[atm]

+printf("The fugacity is %f atm",f);

+printf("\n The fugacity coefficient is %f ",fc);

+

+

+

+

+

+