diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1439 | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '1439')
138 files changed, 1523 insertions, 0 deletions
diff --git a/1439/CH11/EX11.1/11_1.sce b/1439/CH11/EX11.1/11_1.sce new file mode 100755 index 000000000..5344b17fc --- /dev/null +++ b/1439/CH11/EX11.1/11_1.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+R= 8.31*10 //ergs mole^-1 K^-1
+M= 2.016 //gms
+T= 0 //C
+//CALCULATIONS
+vp= sqrt(2*R*(273+T)/M)
+v= sqrt(8*R*(273+T))/(%pi*M)
+vr= sqrt(3*R*(273+T)/M)
+//RESULTS
+printf ('most probabale velocity= %.2e cm sec^-1',vp)
+printf ('\n arthmetic mean velocity= %.2e cm sec^-1',v)
+printf ('\n root mean square velocity= %.2e cm sec^-1',vr)
diff --git a/1439/CH11/EX11.2/11_2.sce b/1439/CH11/EX11.2/11_2.sce new file mode 100755 index 000000000..5fcbcd66c --- /dev/null +++ b/1439/CH11/EX11.2/11_2.sce @@ -0,0 +1,15 @@ +clc
+//initialisation of variables
+R= 8.31*10^7 //ergs mole^-1 K^-1
+M= 9.013 //mg
+T= 1457 //K
+d= 0.318 //cm
+t= 60.1 //min
+m= 9.54 //mg
+g= 980 //cmsec^-2
+D= 13.6 //g/cc
+p= 76 //cm atm^-1
+//CALCULATIONS
+P= sqrt(2*%pi*R*T/M)*(m*10^-3/(%pi*(d/2)^2*t*60*p*D*g))
+//RESULTS
+printf ('vapour pressure= %.2e atm',P)
diff --git a/1439/CH11/EX11.3/11_3.sce b/1439/CH11/EX11.3/11_3.sce new file mode 100755 index 000000000..2a0927592 --- /dev/null +++ b/1439/CH11/EX11.3/11_3.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+M1= 238 //gms
+M2= 235 //gms
+A= 6
+N= 19
+//CALCULATIONS
+r= sqrt((M1+A*N)/(M2+A*N))
+//RESULTS
+printf ('ratio of rates= %.4f ',r)
diff --git a/1439/CH11/EX11.4/11_4.sce b/1439/CH11/EX11.4/11_4.sce new file mode 100755 index 000000000..5064ef2be --- /dev/null +++ b/1439/CH11/EX11.4/11_4.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+s= 3.61*10^-8 //cm
+v= 4.44*10^4 //cm/sec
+n= 2.46*10^19 //molecules
+N= 6.02*10^23 //molecules
+Z1= 13.6*10^16 //collisions cm^-3 sec^-1
+N= 6*10^23 //molecules
+//CALCULATIONS
+Z= sqrt(2)*%pi*s^2*v*n^2*10^3/(2*N)
+Z2= Z1*10^3/N
+//RESULTS
+printf ('Z= %.2e moles of collisons litre^-1 sec^-1',Z)
+printf ('\n Z= %.2e moles of collisons litre^-1 sec^-1',Z2)
diff --git a/1439/CH11/EX11.5/11_5.sce b/1439/CH11/EX11.5/11_5.sce new file mode 100755 index 000000000..a96e6b756 --- /dev/null +++ b/1439/CH11/EX11.5/11_5.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+n= 2.46*10^19 //molecules cm^-3
+n1= 3.24*10^13 //molecules cm^-3
+l= 3.61*10^-8
+//CALCULATIONS
+L= (sqrt(2)*%pi*l^2*n)^-1
+L1=(sqrt(2)*%pi*l^2*n1)^-1
+//RESULTS
+printf ('mean free path= %.2e cm',L)
+printf ('\n mean free path= %.2e cm',L1)
+
+
+//ANSWER GIVEN IN THE TEXTBOOK IS WRONG
diff --git a/1439/CH12/EX12.1/12_1.sce b/1439/CH12/EX12.1/12_1.sce new file mode 100755 index 000000000..b46a1747b --- /dev/null +++ b/1439/CH12/EX12.1/12_1.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+Vs= 23.95 //ml
+Ve= 34.75 //ml
+//CALCULATIONS
+fr= (Ve-Vs)/Ve
+//RESULTS
+printf ('fraction of nitrogen pentoxide remain unreacted after 1 hour= %.3f ',fr)
diff --git a/1439/CH12/EX12.2/12_2.sce b/1439/CH12/EX12.2/12_2.sce new file mode 100755 index 000000000..763c4974e --- /dev/null +++ b/1439/CH12/EX12.2/12_2.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+Ps= 200 //mm
+Pe= 390 //mm
+Pt= 300 //mm
+t= 500 //sec
+Pe1= 400 //mm
+//CALCULATIONS
+r= (Pe1-Pt)/(Pe1-Ps)
+//RESULTS
+printf ('fraction remained undecomposed= %.1f ',r)
diff --git a/1439/CH12/EX12.3/12_3.sce b/1439/CH12/EX12.3/12_3.sce new file mode 100755 index 000000000..804c1695d --- /dev/null +++ b/1439/CH12/EX12.3/12_3.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+V= 1200 //ml
+V1= 100 //ml
+t= 300 //sec
+//CALCULATIONS
+r= V/t
+t1= V1/r
+//RESULTS
+printf ('time of residence of gas= %.f sec',t1)
diff --git a/1439/CH12/EX12.4/12_4.sce b/1439/CH12/EX12.4/12_4.sce new file mode 100755 index 000000000..7d80277c1 --- /dev/null +++ b/1439/CH12/EX12.4/12_4.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+y= 0.550
+x= 2400
+d= 0.00494
+//CALCULATIONS
+s= y/x
+k= s*2.303/d
+//RESULTS
+printf ('k= %.3f lit mol^-1 sec^-1',k)
diff --git a/1439/CH12/EX12.7/12_7.sce b/1439/CH12/EX12.7/12_7.sce new file mode 100755 index 000000000..a4363b84f --- /dev/null +++ b/1439/CH12/EX12.7/12_7.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+T= 393.7 //C
+k= 2.6*10^-4 //lit mol^-1 sec^-1
+R= 1.987 //cal mole^-1 K^-1
+E= 45.6 //kcal mole^-1
+wl= 3.5 //A
+N= 6*10^23 //molecules
+R1= 8.31*10 //ergs mole^-1 K^-1
+M= 127.9 //g mole^-1
+//CALCULATIONS
+k= 2*10^2*N*sqrt(%pi*R1*(273.1+T)/M)*(wl*10^-8)^2*%e^(-E*10^3/(R*(273.1+T)))
+//RESULTS
+printf ('second order rate for this constant= %.1e lit mol^-1 sec^-1',k)
diff --git a/1439/CH13/EX13.1/13_1.sce b/1439/CH13/EX13.1/13_1.sce new file mode 100755 index 000000000..3811e7e68 --- /dev/null +++ b/1439/CH13/EX13.1/13_1.sce @@ -0,0 +1,18 @@ +clc
+//initialisation of variables
+t= 10 //min
+i= 0.1 //amp
+M= 63.54 //gm mole^-1
+n=2
+F= 96500 //amp-sec equiv^-1
+Mo= 32 //g mole^-1
+T= 25 //C
+R= 0.08205 //l-atm deg^-1 mole^-1
+p= 740
+n1=4
+//CALCULATIONS
+m= t*60*i*M/(F*n)
+V= t*60*i*Mo*R*(273+T)*760/(F*n1*Mo*p)
+//RESULTS
+printf ('number of grams of copper deposited at cathode= %.5f gram',m)
+printf ('\n volume of oxygen liberated at anode= %.5f lit',V)
diff --git a/1439/CH13/EX13.10/13_10.sce b/1439/CH13/EX13.10/13_10.sce new file mode 100755 index 000000000..97d02e432 --- /dev/null +++ b/1439/CH13/EX13.10/13_10.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+Tn= 0.820
+Tn1=0.450
+A= 426.1
+A1= 91
+//CALCULATIONS
+l= Tn*A
+l1= Tn1*A1
+L= l+l1
+//RESULTS
+printf ('A0 for acetic acid= %.1f ',L)
diff --git a/1439/CH13/EX13.11/13_11.sce b/1439/CH13/EX13.11/13_11.sce new file mode 100755 index 000000000..f24d4482b --- /dev/null +++ b/1439/CH13/EX13.11/13_11.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+T= 25 //C
+n= 2
+F= 96500 //coloumbs
+R= 8.316 //J mole^-1 K^-1
+a= 76.2*10-5
+a1= 79*10^-5
+A= 155.2*10^-5
+//CALCULATIONS
+D0= n*a*a1*R*(273+T)*10^-6/(F*A)
+//RESULTS
+printf ('limiting diffusion coefficient= %.2e cm^2 sec^-1',D0)
diff --git a/1439/CH13/EX13.2/13_2.sce b/1439/CH13/EX13.2/13_2.sce new file mode 100755 index 000000000..4ad6e9965 --- /dev/null +++ b/1439/CH13/EX13.2/13_2.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+r= 82.4 //ohms
+k= 0.002768 //ohm^-1
+R1= 326 //ohm
+//CALCULATIONS
+K= r*k
+K1= (K/R1)
+//RESULTS
+printf ('cell constant= %.4f cm^-1',K)
+printf ('\n specific conductance= %.3e ohm^-1 cm^-1',K1)
diff --git a/1439/CH13/EX13.3/13_3.sce b/1439/CH13/EX13.3/13_3.sce new file mode 100755 index 000000000..7166cd235 --- /dev/null +++ b/1439/CH13/EX13.3/13_3.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+C= 0.005 //N
+k= 6.997*10^-4 //ohm^-1 cm^-1
+//CALCULATIONS
+A= 1000*k/C
+//RESULTS
+printf ('equivalent conductance= %.1f cm^2 equiv^-1 ohm^-1',A)
diff --git a/1439/CH13/EX13.4/13_4.sce b/1439/CH13/EX13.4/13_4.sce new file mode 100755 index 000000000..3da390dce --- /dev/null +++ b/1439/CH13/EX13.4/13_4.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+AHcl= 426.1 //cm^2 equiv^-1 ohm^-1
+ANaC2H3O2= 91 //cm^2 equiv^-1 ohm^-1
+ANaCl= 126.5 //cm^2 equiv^-1 ohm^-1
+//CALCULATIONS
+AHC2H3O2= AHcl+ANaC2H3O2-ANaCl
+//RESULTS
+printf ('equivalent conductance of acetic acid= %.1f cm^2 equiv^-1 ohm^-1',AHC2H3O2)
diff --git a/1439/CH13/EX13.5/13_5.sce b/1439/CH13/EX13.5/13_5.sce new file mode 100755 index 000000000..94426d6f5 --- /dev/null +++ b/1439/CH13/EX13.5/13_5.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+Ke= 48.15
+Ki= 390.6
+c= 0.001028 //N
+//CALCULATIONS
+a= Ke/Ki
+K= a^2*c/(1-a)
+//RESULTS
+printf ('ionisation constant= %.2e ',K)
diff --git a/1439/CH13/EX13.6/13_6.sce b/1439/CH13/EX13.6/13_6.sce new file mode 100755 index 000000000..566b0fe03 --- /dev/null +++ b/1439/CH13/EX13.6/13_6.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+i= 0.00521 //amp
+A= 0.23 //cm^2
+k= 0.0129 //ohm^-1 cm^-1
+t= 67 //min
+l= 4.64 //cm
+//CALCULATIONS
+r= i/(A*k)
+uK= l/(t*60*r)
+//RESULTS
+printf ('electrical field strength= %.2f volts cm^-1',r)
+printf ('\n mobility of potassium ion= %.1e cm^2 volt^-1 cm^-1',uK)
diff --git a/1439/CH13/EX13.7/13_7.sce b/1439/CH13/EX13.7/13_7.sce new file mode 100755 index 000000000..c0203581e --- /dev/null +++ b/1439/CH13/EX13.7/13_7.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+C= 0.1 //N
+F= 96500 //coloumbs
+mna= 42.6*10^-5 //cm^2 volt sec^-1
+mcl= 68*10^-5 // cm^2 colt sec^-1
+//CALCULATIONS
+k= F*(mna+mcl)*C/1000
+//RESULTS
+printf ('specific conductance of sodium chloride= %.5f ohm^-1 cm^-1',k)
diff --git a/1439/CH13/EX13.8/13_8.sce b/1439/CH13/EX13.8/13_8.sce new file mode 100755 index 000000000..808dbddce --- /dev/null +++ b/1439/CH13/EX13.8/13_8.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+V= 4.9 //faraday^-1
+c= 0.1 //N
+//CALCULATIONS
+TK= V*c
+Tcl= 1-TK
+//RESULTS
+printf ('transference number of chlorine= %.3f ',Tcl)
diff --git a/1439/CH13/EX13.9/13_9.sce b/1439/CH13/EX13.9/13_9.sce new file mode 100755 index 000000000..0b9937463 --- /dev/null +++ b/1439/CH13/EX13.9/13_9.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+Mc= 63.54 //gms
+n= 2
+mc= 0.3 //gms
+mc1= 1.43
+mc2= 1.2140
+//CALCULATIONS
+Me= Mc/n
+Tc= ((mc/Me)-((mc1-mc2)/Me))/(mc/Me)
+Ta= 1-Tc
+//RESULTS
+printf ('copper transference number= %.2f ',Ta)
diff --git a/1439/CH14/EX14.1/14_1.sce b/1439/CH14/EX14.1/14_1.sce new file mode 100755 index 000000000..147ba31a4 --- /dev/null +++ b/1439/CH14/EX14.1/14_1.sce @@ -0,0 +1,15 @@ +clc
+//initialisation of variables
+n=2
+V= 0.67533 //volt
+E= 23060 //cal volt^-1
+Tc= -6.5*10^-4 //volt deg^-1
+T= 25 //C
+//CALCULATIONS
+G= -n*V*E
+S= n*E*Tc
+H= -n*E*V+n*Tc*E*(273+T)
+//RESULTS
+printf ('dG = %.f cal',G)
+printf ('\n dS = %.f cal deg^-1',S)
+printf ('\n dH = %.f cal',H)
diff --git a/1439/CH14/EX14.10/14_10.sce b/1439/CH14/EX14.10/14_10.sce new file mode 100755 index 000000000..f516f9e00 --- /dev/null +++ b/1439/CH14/EX14.10/14_10.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+n= 2
+R= 0.0591
+C= 0.01 //M
+C1= 0.1 //M
+//CALCULATIONS
+E= -R*log10(C/C1)/n
+//RESULTS
+printf ('electromotive force of the cell = %.4f volt',E)
diff --git a/1439/CH14/EX14.3/14_3.sce b/1439/CH14/EX14.3/14_3.sce new file mode 100755 index 000000000..2736ab79d --- /dev/null +++ b/1439/CH14/EX14.3/14_3.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+C= 0.01 //M
+C1= 0.02 //M
+n=1
+n1=2
+//CALCULATIONS
+I= 0.5*(C*n^2+C^n^2)
+I1= 0.5*(C1*n^2+C*n1^2)
+I2= 0.5*(C*n1^2+C*n1^2)
+//RESULTS
+printf ('ionic strength of NaCl = %.2f ',I)
+printf ('\n ionic strength of Li2SO4 = %.2f ',I1)
+printf ('\n ionic strength of CuSO4 = %.2f ',I2)
diff --git a/1439/CH14/EX14.4/14_4.sce b/1439/CH14/EX14.4/14_4.sce new file mode 100755 index 000000000..961c514a5 --- /dev/null +++ b/1439/CH14/EX14.4/14_4.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+C= 0.1 //M
+V= 0.3524 //volt
+V1= 0.2224 //volt
+V2= 0.1183 //volt
+//CLACULATIONS
+r= 10^((-V+V1+V2)/V2)
+//RESULTS
+printf ('mean ionic activity = %.3f ',r)
diff --git a/1439/CH14/EX14.5/14_5.sce b/1439/CH14/EX14.5/14_5.sce new file mode 100755 index 000000000..88c2b07d2 --- /dev/null +++ b/1439/CH14/EX14.5/14_5.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+n=2
+F= 96500 //coloumbs
+E= 0.337 //volt
+E1= -0.403 //volt
+//CALCULATIONS
+E0= E-E1
+G= -n*F*E0/4.184
+//RESULTS
+printf ('voltage of cell = %.3f volt',E0)
+printf ('\n gibbs free energy= %.f cal',G)
diff --git a/1439/CH14/EX14.6/14_6.sce b/1439/CH14/EX14.6/14_6.sce new file mode 100755 index 000000000..953512d17 --- /dev/null +++ b/1439/CH14/EX14.6/14_6.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+E= -0.403 //volt
+E1= -0.763 //volt
+//CALCULATIONS
+E0= E-E1
+//RESULTS
+printf ('voltage of cell = %.3f volt',E0)
diff --git a/1439/CH14/EX14.7/14_7.sce b/1439/CH14/EX14.7/14_7.sce new file mode 100755 index 000000000..bae57dcc1 --- /dev/null +++ b/1439/CH14/EX14.7/14_7.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+E= 1.360 //volt
+E1= 0.337 //volt
+F= 965000 //coloumbs
+//CALCULATIONS
+G= -F*(E-E1)/4.1840
+//RESULTS
+printf ('Gibbs free energy = %.f cal',G)
diff --git a/1439/CH14/EX14.8/14_8.sce b/1439/CH14/EX14.8/14_8.sce new file mode 100755 index 000000000..27d4fe94f --- /dev/null +++ b/1439/CH14/EX14.8/14_8.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+E= -0.126 //volt
+E1= -0.140 //volt
+n=2
+R= 0.0591 //volt
+//CALCULATIONS
+E0= E-E1
+K= 10^((E-E1)*n/R)
+//RESULTS
+printf ('equilibrium constant = %.2f ',K)
diff --git a/1439/CH14/EX14.9/14_9.sce b/1439/CH14/EX14.9/14_9.sce new file mode 100755 index 000000000..6bc167ce6 --- /dev/null +++ b/1439/CH14/EX14.9/14_9.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+E0= 0.0140 //volt
+n= 2
+r= 2
+V= 96500 //coloumbs
+//CALCULATIONS
+E= E0-0.0576*log10(n)
+G= -n*V*E/4.1840
+//RESULTS
+printf ('gibbs free energy = %.f cal',G)
diff --git a/1439/CH15/EX15.1/15_1.sce b/1439/CH15/EX15.1/15_1.sce new file mode 100755 index 000000000..34f301690 --- /dev/null +++ b/1439/CH15/EX15.1/15_1.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+c= 8*10^-5 //molar
+n= 2
+//CALCULATIONS
+Ksp= c^3*n^2
+x= Ksp*10^6
+//RESULTS
+printf ('solubility product = %.1e ',Ksp)
+printf ('\n solubility = %.1e ',x)
diff --git a/1439/CH15/EX15.10/15_10.sce b/1439/CH15/EX15.10/15_10.sce new file mode 100755 index 000000000..6b186c8ad --- /dev/null +++ b/1439/CH15/EX15.10/15_10.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+pH= 9.26
+M= 0.02 //N
+M1= 0.01 ///N
+//CALCULATIONS
+pH1= pH+log(M1/M)
+//RESULTS
+printf ('pH = %.2f ',pH1)
diff --git a/1439/CH15/EX15.11/15_11.sce b/1439/CH15/EX15.11/15_11.sce new file mode 100755 index 000000000..407cec642 --- /dev/null +++ b/1439/CH15/EX15.11/15_11.sce @@ -0,0 +1,17 @@ +clc
+//initialisation of variables
+pKa= 6.84
+n= 0.04 //mole
+n1= 0.02 //mole
+n2= 0.001 //mole
+pH3= 7
+//CALCULATIONS
+pH= pKa+log10(n/n1)
+pH1= pKa+log10((n-n2)/(n1+n2))
+dpH= pH-pH1
+pH2= -log10(n2)
+dpH1= pH3-pH2
+//RESULTS
+printf ('pH = %.2f ',pH1)
+printf ('\n dpH = %.2f ',dpH)
+printf ('\n dpH = %.2f ',dpH1)
diff --git a/1439/CH15/EX15.2/15_2.sce b/1439/CH15/EX15.2/15_2.sce new file mode 100755 index 000000000..982b0809c --- /dev/null +++ b/1439/CH15/EX15.2/15_2.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+Ksp= 2*10^-12
+M= 8.84*10^-5 //molar
+n= 2
+//CALCULATIONS
+r= (Ksp/(n^2*M^3))^(1/3)
+//RESULTS
+printf ('mean ionic activity coefficient = %.1f ',r)
diff --git a/1439/CH15/EX15.3/15_3.sce b/1439/CH15/EX15.3/15_3.sce new file mode 100755 index 000000000..641f96c8b --- /dev/null +++ b/1439/CH15/EX15.3/15_3.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+n= 2
+C= 0.01 //M
+//CALCULATIONS
+r= 10^(-0.509*n*sqrt(C))
+//RESULTS
+printf ('mean ionic activity coefficient = %.2f ',r)
diff --git a/1439/CH15/EX15.4/15_4.sce b/1439/CH15/EX15.4/15_4.sce new file mode 100755 index 000000000..57a718ff5 --- /dev/null +++ b/1439/CH15/EX15.4/15_4.sce @@ -0,0 +1,15 @@ +clc
+//initialisation of variables
+M= 18 //gms
+k= 5.5*10^-8 //ohm^-1 cm^-1
+lc= 349.8 //cm^2 equiv^-1 ohm^-1
+la= 198 //cm^2 equiv^-1 ohm^-1
+//CALCULATIONS
+A= M*k
+A0= lc+la
+a= A/A0
+a1= 1000*a/M
+Kw= a1*a1
+//RESULTS
+printf ('degree of ionisation = %.1e ',a1)
+printf ('\n ion product of water = %.1e ',Kw)
diff --git a/1439/CH15/EX15.5/15_5.sce b/1439/CH15/EX15.5/15_5.sce new file mode 100755 index 000000000..5e443a8bd --- /dev/null +++ b/1439/CH15/EX15.5/15_5.sce @@ -0,0 +1,7 @@ +clc
+//initialisation of variables
+Ka= 1.772*10^-4
+//CALCULATIONS
+pK= -log10(Ka)
+//RESULTS
+printf ('pKa = %.2f ',pK)
diff --git a/1439/CH15/EX15.6/15_6.sce b/1439/CH15/EX15.6/15_6.sce new file mode 100755 index 000000000..e7b34266b --- /dev/null +++ b/1439/CH15/EX15.6/15_6.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+K= 1.75*10^-5
+c= 0.01 //M
+//CALCULATIONS
+r= 10^(-0.509*sqrt(c))
+Ka= K/r^2
+//RESULTS
+printf ('ionisation constant = %.2e ',Ka)
diff --git a/1439/CH15/EX15.7/15_7.sce b/1439/CH15/EX15.7/15_7.sce new file mode 100755 index 000000000..ea5e1c904 --- /dev/null +++ b/1439/CH15/EX15.7/15_7.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+ka= 1.75*10^-5
+ca= 0.1 //mole lit
+//CALCULATIONS
+pH= -log10(sqrt(ka*ca))
+//RESULTS
+printf ('pH = %.2f ',pH)
diff --git a/1439/CH15/EX15.8/15_8.sce b/1439/CH15/EX15.8/15_8.sce new file mode 100755 index 000000000..132075297 --- /dev/null +++ b/1439/CH15/EX15.8/15_8.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+kw= 10^-14
+ka= 2.69*10^-5
+c= 0.1 //N
+//CALCULATIONS
+pH= -log10(sqrt(kw*ka/c))
+//RESULTS
+printf ('pH = %.2f ',pH)
diff --git a/1439/CH15/EX15.9/15_9.sce b/1439/CH15/EX15.9/15_9.sce new file mode 100755 index 000000000..acc1ade52 --- /dev/null +++ b/1439/CH15/EX15.9/15_9.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+pH= 4.57
+M= 0.03 //mole litre^-1
+M1= 0.1 //mole litre^-1
+//CALCULATIONS
+pH1= pH+log10(M1/M)
+//RESULTS
+printf ('pH = %.2f ',pH1)
diff --git a/1439/CH16/EX16.1/16_1.sce b/1439/CH16/EX16.1/16_1.sce new file mode 100755 index 000000000..d964832fb --- /dev/null +++ b/1439/CH16/EX16.1/16_1.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+e= 1.6*10^-19 //coloumb electron^-1
+F= 96496 //coloumbs equiv^-1
+//CALCULATIONS
+N= F/e
+//RESULTS
+printf ('avagadros number = %.3e coloumbs equiv^-1',N)
diff --git a/1439/CH16/EX16.2/16_2.sce b/1439/CH16/EX16.2/16_2.sce new file mode 100755 index 000000000..2c0a2f50c --- /dev/null +++ b/1439/CH16/EX16.2/16_2.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+wl= 4500 //A
+c= 3*10^10 //cm/sec
+//CALCULATIONS
+l= wl*10^-8
+l1= wl*10^-1
+f= 1/l
+f1= c/l
+//RESULTS
+printf ('wavelength in centimetres = %.1e cm',l)
+printf ('\n wavelength in micrometres = %.1e cm',l1)
+printf ('\n frequency of bluelight = %.2e sec^-1',f1)
+printf ('\n wave number = %.2e cm^-1',f)
diff --git a/1439/CH18/EX18.1/18_1.sce b/1439/CH18/EX18.1/18_1.sce new file mode 100755 index 000000000..5cf7c5391 --- /dev/null +++ b/1439/CH18/EX18.1/18_1.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+l= 3000 //A
+h= 6.62*10^-27 //erg sec
+c= 3*10^10 //cm/sec
+N= 6*10^23
+//CALCULATIONS
+E= h*c/(l*10^-8)
+E1= E*N/(4.18*10^7)
+//RESULTS
+printf (' energy in ergs = %.f cal mole^-1',E1+276)
diff --git a/1439/CH18/EX18.2/18_2.sce b/1439/CH18/EX18.2/18_2.sce new file mode 100755 index 000000000..9d79b9d4b --- /dev/null +++ b/1439/CH18/EX18.2/18_2.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+E= 95300 //cal mole^-1
+l= 3000 //A
+e= 23060 //cal mole^-1 ev^-1
+//CALCULATIONS
+e1= E/e
+//RESULTS
+printf (' energy in electron = %.2f electron volts',e1)
diff --git a/1439/CH18/EX18.4/18_4.sce b/1439/CH18/EX18.4/18_4.sce new file mode 100755 index 000000000..7ef44b55c --- /dev/null +++ b/1439/CH18/EX18.4/18_4.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+a= 193 //mole^-1 cm^-1
+b= 2 //cm
+c= 1.55*10^-3 //mole l^-1
+//CALCULATIONS
+r= 100/10^(a*b*c)
+//RESULTS
+printf (' perentage = %.2f per cent',r)
diff --git a/1439/CH18/EX18.5/18_5.sce b/1439/CH18/EX18.5/18_5.sce new file mode 100755 index 000000000..de57686f9 --- /dev/null +++ b/1439/CH18/EX18.5/18_5.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+m= 1.008 //gms
+m1= 36.98 //gms
+N= 6*10^23 //molecules
+r= 1.275*10^-8 //cm
+//CALCULATIONS
+u= m*m1/(N*(m+m1))
+I= u*r^2
+//RESULTS
+printf (' reduced mass = %.2e g',u)
+printf (' \n moment of inertia = %.2e g cm^2',I)
diff --git a/1439/CH18/EX18.6/18_6.sce b/1439/CH18/EX18.6/18_6.sce new file mode 100755 index 000000000..5ea78a2b0 --- /dev/null +++ b/1439/CH18/EX18.6/18_6.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+h= 6.625*10^-27 //erg sec
+c= 3*10^10 //cm sec^-1
+k= 2.647*10^-40 //gm cm^2
+//CALCULATIONS
+v= h/(4*%pi^2*k*c)
+//RESULTS
+printf (' frequency = %.1f cm^-1',v)
diff --git a/1439/CH18/EX18.7/18_7.sce b/1439/CH18/EX18.7/18_7.sce new file mode 100755 index 000000000..9a473cfe6 --- /dev/null +++ b/1439/CH18/EX18.7/18_7.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+v= 8.867*10^13 //sec^-1
+u= 1.628*10^-24 //gms
+//CALCULATIONS
+k= (%pi*2*v)^2*u
+//RESULTS
+printf (' force constant = %.2e dyne cm^-1',k)
diff --git a/1439/CH18/EX18.8/18_8.sce b/1439/CH18/EX18.8/18_8.sce new file mode 100755 index 000000000..a3e29b1ef --- /dev/null +++ b/1439/CH18/EX18.8/18_8.sce @@ -0,0 +1,15 @@ +clc
+//initialisation of variables
+e= 23.06 //kcal mole^-1
+E= 4.476 //ev
+h= 6.627*10^-27 //ergs sec
+c= 3*10^10 //cm/sec
+v= 4395 //cm^-1
+e1= 8060 //ev
+N= 6*10^23
+//CALCULATIONS
+D= E*e+(h*c*N*v/(2*10^3*4.184*10^7))
+D1= E*e1+(v/2)
+//RESULTS
+printf (' dissociation energy = %.1f kcal mole^-1',D)
+printf (' \n dissociation energy = %.f cm^-1',D1+26)
diff --git a/1439/CH18/EX19.3/18_3.sce b/1439/CH18/EX19.3/18_3.sce new file mode 100755 index 000000000..5fbaeed87 --- /dev/null +++ b/1439/CH18/EX19.3/18_3.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+p= 19.2 //per cent
+b= 1 //cm
+c= 5*10^-4 //mole l^-1
+m= 1.75*10^-4 //M
+//CALCULATIONS
+As= log10(100/p)
+am= As/(b*c)
+r= 100/10^(am*m)
+//RESULTS
+printf (' perentage trnasmmitancy= %.1f per cent',r)
diff --git a/1439/CH19/EX19.1/19_1.sce b/1439/CH19/EX19.1/19_1.sce new file mode 100755 index 000000000..c8298ea69 --- /dev/null +++ b/1439/CH19/EX19.1/19_1.sce @@ -0,0 +1,19 @@ +clc
+//initialisation of variables
+Na= 1
+Nb= 1
+Nc= 1
+Na1= 2
+Nb1= 1
+Nc1= 0
+Na2= 3
+Nb2= 0
+Nc2= 0
+//CALCULATIONS
+Wabc= factorial(Na+Nb+Nc)/(factorial(Na)*factorial(Nb)*factorial(Nc))
+Waab= factorial(Na1+Nb1+Nc1)/(factorial(Na1)*factorial(Nb1)*factorial(Nc1))
+Waaa= factorial(Na2+Nb2+Nc2)/(factorial(Na2)*factorial(Nb2)*factorial(Nc2))
+//RESULTS
+printf ('Wabc = %.f ',Wabc)
+printf ('\n Waab = %.f ',Waab)
+printf ('\n Waaa = %.f ',Waaa)
diff --git a/1439/CH19/EX19.2/19_2.sce b/1439/CH19/EX19.2/19_2.sce new file mode 100755 index 000000000..3b2b125fc --- /dev/null +++ b/1439/CH19/EX19.2/19_2.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+K= 4.9860 //cal deg^-1 mole^-1
+K1= -31.6 //cal deg^-1 mole^-1
+//CALCULATIONS
+S= K-K1
+//RESULTS
+printf ('Enthalpy = %.1f cal deg^-1 mole^-1',S)
diff --git a/1439/CH19/EX19.4/19_4.sce b/1439/CH19/EX19.4/19_4.sce new file mode 100755 index 000000000..30cf96de9 --- /dev/null +++ b/1439/CH19/EX19.4/19_4.sce @@ -0,0 +1,19 @@ +clc
+//initialisation of variables
+No= 0.979889
+v= 2989.74 //cm^-1
+rc= 1.2746 //A
+T= 25 //C
+E1= 6.8635 //cal deg^-1 mole^-1
+E2= 11.4392 //cal deg^-1 mole^-1
+E3= 7.2820 //cal deg^-1 mole^-1
+E4= 4.5757 //cal deg^-1 mole^-1
+E5= 2.7676 //cal deg^-1 mole^-1
+r1= 0.265 //A
+r= 35.99 //A
+//CALCULATIONS
+Et= E1*log10(r)+E2*log10(273.15+T)- E3
+Ei= E4*log10(r1)+E4*log10(273.15+T)-E5
+//RESULTS
+printf ('Transitional energy = %.1f cal deg^-1 mole^-1',Et)
+printf ('\n rorational energy = %.1f cal deg^-1 mole^-1',Ei)
diff --git a/1439/CH2/EX2.1/2_1.sce b/1439/CH2/EX2.1/2_1.sce new file mode 100755 index 000000000..39406d41e --- /dev/null +++ b/1439/CH2/EX2.1/2_1.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+G= 20 //gram
+R= 0.08205 //l-atm /mole K
+T= 30 //C
+P= 740 //mm
+M= 44.01 //l
+//CALCULATIONS
+V= G*R*(273.15+T)*760/(P*M)
+//RESULTS
+printf ('volume occupied by 20 grmas of carbon dioxide= %.1f litre',V)
diff --git a/1439/CH2/EX2.2/2_2.sce b/1439/CH2/EX2.2/2_2.sce new file mode 100755 index 000000000..912658c32 --- /dev/null +++ b/1439/CH2/EX2.2/2_2.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+G= 0.110 //gram
+R= 0.08205 //l-atm /mole K
+T= 26.1 //C
+P= 743 //mm
+V= 0.0270 //l
+//CALCULATIONS
+M= G*R*(273.15+T)*760/(P*V)
+//RESULTS
+printf ('molecular weight of hydrocarbon= %.f g mole^-1',M)
diff --git a/1439/CH2/EX2.4/2_4.sce b/1439/CH2/EX2.4/2_4.sce new file mode 100755 index 000000000..11507153e --- /dev/null +++ b/1439/CH2/EX2.4/2_4.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+R= 0.08205 //l-atm deg^-1 mole^-1
+T= 25 //K
+n= 1 //mole
+V= 0.5 //lit
+b= 0.04267 //lit mole^-1
+a= 3.592 //lit^2 atm mol^-2
+//CALCULATIONS
+P= R*(273.15+T)/V
+P1= (R*(273.15+T)/(V-b))-(a/V^2)
+//RESULTS
+printf ('pressure calculated using ideal gas law= %.1f atm',P)
+printf ('\n pressure calculated using vander wals equation= %.1f atm',P1)
diff --git a/1439/CH2/EX2.5/2_5.sce b/1439/CH2/EX2.5/2_5.sce new file mode 100755 index 000000000..0918bbd29 --- /dev/null +++ b/1439/CH2/EX2.5/2_5.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+T= -88 //C
+Tc= 154.4 //K
+Pc= 49.7 //atm
+P= 44.7 //atm
+R= 0.08205 //atm m^3 mole^-1 K^-1
+r= 0.8
+//CALCULATIONS
+V= r*R*(273.15+T)/P
+//RESULTS
+printf ('volume pccupied by mole of oxygen= %.3f litre mole^-1',V)
diff --git a/1439/CH20/EX20.1/20_1.sce b/1439/CH20/EX20.1/20_1.sce new file mode 100755 index 000000000..11d71872d --- /dev/null +++ b/1439/CH20/EX20.1/20_1.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+R= 0.082 //l-atm deg^-1 mole^-1
+T= 25 //C
+V= 85*10^-6 //l-atm g^-1
+//CALCULATIONS
+M= R*(273+T)/V
+//RESULTS
+printf ('average molecular weight of this polystrene = %.f g mole^-1',M)
diff --git a/1439/CH20/EX20.2/20_2.sce b/1439/CH20/EX20.2/20_2.sce new file mode 100755 index 000000000..fc733c486 --- /dev/null +++ b/1439/CH20/EX20.2/20_2.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+T= 20 //C
+v= 0.01005 //poise
+N= 6*10^23 //molecules
+D= 7.8*10^-7
+//CALCULATIONS
+M= 4*%pi*N/(3*0.75*(D*N*6*%pi*v/(8.31*10^7*(273+T)))^3)
+//RESULTS
+printf ('maximum molecular weight = %.f g mole^-1',M)
diff --git a/1439/CH20/EX20.3/20_3.sce b/1439/CH20/EX20.3/20_3.sce new file mode 100755 index 000000000..e8871862e --- /dev/null +++ b/1439/CH20/EX20.3/20_3.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+w= 2.82*10^7
+t2= 70 //min
+t1= 60 //min
+r2= 6.731 //cm
+r1= 5.949 //cm
+//CALCULATIONS
+s= 2.303*log10(r2/r1)/(w*t2*t1)
+//RESULTS
+printf ('time = %.1e sec',s)
diff --git a/1439/CH20/EX20.4/20_4.sce b/1439/CH20/EX20.4/20_4.sce new file mode 100755 index 000000000..4774aabe4 --- /dev/null +++ b/1439/CH20/EX20.4/20_4.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+R= 8.31*10^7 //ergs deg^-1 mole^-1
+T= 20 //C
+s= 4.3*10^-13 //sec
+D= 6.15*10^-7 //cm^2 sec^-1
+d= 0.9982 //g/cc
+v= 0.735 //cm^3 g^-1
+//CALCULATIONS
+M= R*(273+T)*s/(D*(1-d*v))
+//RESULTS
+printf ('molecular weight serum albium = %.f g mole^-1',M)
diff --git a/1439/CH20/EX20.5/20_5.sce b/1439/CH20/EX20.5/20_5.sce new file mode 100755 index 000000000..3f50a2108 --- /dev/null +++ b/1439/CH20/EX20.5/20_5.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+K= 3.7*10^-4
+a= 0.62
+iv= 0.74
+//CALCULATIONS
+M= (iv/K)^(1/a)
+//RESULTS
+printf ('Molecular weight = %.f g mole^-1',M)
diff --git a/1439/CH21/EX21.1/21_1.sce b/1439/CH21/EX21.1/21_1.sce new file mode 100755 index 000000000..b61b1c15a --- /dev/null +++ b/1439/CH21/EX21.1/21_1.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+A= 500 //cm^2
+m= 0.106 //mg
+N= 6*10^23 //molecules
+M= 284 //g mole^-1
+d= 0.85 //g/cm^3
+//CALCULATIONS
+A1= A*M/(N*m^10^-3)
+t= m*10^-3/(A*d)
+//RESULTS
+printf ('cross-sectional area = %.e cm^2 ',A1)
+printf ('\n thcikness t of the film = %.e cm ',t)
diff --git a/1439/CH21/EX21.2/21_2.sce b/1439/CH21/EX21.2/21_2.sce new file mode 100755 index 000000000..c5712118d --- /dev/null +++ b/1439/CH21/EX21.2/21_2.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+V= 129 //ml g^-1
+N= 6*10^23 //molecules
+A= 16.2 //A^2
+//CALCULATIONS
+SA= V*N*A*10^-10/(10^3*22.4)
+//RESULTS
+printf ('surface area per gram of gel = %.f m^2 g^-1',SA)
diff --git a/1439/CH22/EX23.1/22_1.sce b/1439/CH22/EX23.1/22_1.sce new file mode 100755 index 000000000..9f7910879 --- /dev/null +++ b/1439/CH22/EX23.1/22_1.sce @@ -0,0 +1,17 @@ +clc
+//initialisation of variables
+d= 0.856 //g/cc
+N= 6*10^23 //molecules
+M= 39.1 //g mole^-1
+n= 2
+n1= 4
+n2= 12
+//CALCULATIONS
+a= (n*M/(N*d))^(1/3)
+d= a*10^8/sqrt(n1)
+d1= a*10^8/sqrt(n)
+d2= a*10^8/sqrt(n2)
+//RESULTS
+printf ('distance between planes = %.2f A',d)
+printf ('\n distance between planes = %.2f A',d1)
+printf ('\n distance between planes = %.2f A',d2)
diff --git a/1439/CH23/EX23.1/23_1.sce b/1439/CH23/EX23.1/23_1.sce new file mode 100755 index 000000000..0f3b0097b --- /dev/null +++ b/1439/CH23/EX23.1/23_1.sce @@ -0,0 +1,7 @@ +clc
+//initialisation of variables
+k= 9.12*10^-4 //sec^-1
+H= 25100 //cal mole^-1
+S= -10.6 //cal deg^-1 mole^-1
+//RESULTS
+printf ('Entropy of activation = %.1f cal deg^-1 mole^-1',S)
diff --git a/1439/CH23/EX23.2/23_2.sce b/1439/CH23/EX23.2/23_2.sce new file mode 100755 index 000000000..8c2483f07 --- /dev/null +++ b/1439/CH23/EX23.2/23_2.sce @@ -0,0 +1,16 @@ +clc
+//initialisation of variables
+h= 6.62*10^-27 //ergs/sec
+c= 3*10^10 //cm/sec
+wl= 4358 //A
+I= 14000 //ergs sec^-1
+p= 80.1 //percent
+t= 1105 //sec
+n= 0.075 //millimole
+//CALCULATIONS
+E= h*c/(wl*10^-8)
+q= I*p*t/(100*E)
+M= 6*10^23*n*10^-3
+P= M/q
+//RESULTS
+printf ('quantum yield = %.1f ',P)
diff --git a/1439/CH23/EX23.4/23_4.sce b/1439/CH23/EX23.4/23_4.sce new file mode 100755 index 000000000..2277835b4 --- /dev/null +++ b/1439/CH23/EX23.4/23_4.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+a= 43560 //ft^-2
+t= 500 //min day^-1
+E= 1000 //cal min^-1 ft^-2
+m= 2 //tons acre^-1
+E1= 4000 //cal gram^-1
+M= 9.07*10^5 //gram ton^-1
+//CALCULATIONS
+Sh= a*t*E*365.26
+Hs= m*M*E1
+r= Hs/Sh
+//RESULTS
+printf ('fraction of solar energy stored = %.3f ',r)
diff --git a/1439/CH23/EX23.5/23_5.sce b/1439/CH23/EX23.5/23_5.sce new file mode 100755 index 000000000..38834594c --- /dev/null +++ b/1439/CH23/EX23.5/23_5.sce @@ -0,0 +1,18 @@ +clc
+//initialisation of variables
+h= 6.625*10^-27 //ergs/mole
+f= 2.65*10^-5 //sec^-1
+c= 3*10^10 //cm/sec
+t= 2
+N= 6*10^23 //molecules
+M= 382 //gms
+E1= 750 //ergs
+//CALCULATIONS
+E= h*c/f
+n1= E1/E
+m= n1/(t*7)
+G= m*M/N
+//RESULTS
+printf ('number of quanta = %.2e ',n1)
+printf ('\n number of quanta = %.2e molecules',m)
+printf ('\n grams per day= %.2e gms',G)
diff --git a/1439/CH24/EX24.1/24_1.sce b/1439/CH24/EX24.1/24_1.sce new file mode 100755 index 000000000..648303c18 --- /dev/null +++ b/1439/CH24/EX24.1/24_1.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+E= 931 //Mev/amu
+nc= 6
+m= 1.00814 //amu
+m1= 1.00898
+mc= 12.0038
+//CALCULAIONS
+md= nc*m+nc*m1-mc
+BE= E*md
+//RESULTS
+printf ('BInding Energy = %.1f Mev',BE)
diff --git a/1439/CH24/EX24.2/24_2.sce b/1439/CH24/EX24.2/24_2.sce new file mode 100755 index 000000000..fb6549b2b --- /dev/null +++ b/1439/CH24/EX24.2/24_2.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+r= 1.07*10^-4 //ml g^-1 day^-1
+N1= 3.4*10^10 //alpha particles g^-1 sec^-1
+//CALCULATIONS
+N= 22400*N1*24*60*60/r
+//RESULTS
+printf ('avagadro number = %.2e ',N)
diff --git a/1439/CH24/EX24.3/24_3.sce b/1439/CH24/EX24.3/24_3.sce new file mode 100755 index 000000000..3fcb35898 --- /dev/null +++ b/1439/CH24/EX24.3/24_3.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+R= 0.08205 //l-atm mole^-1 K^-1
+T= 25 //C
+p= 1 //atm
+Mr= 226 //gms
+th= 3.82 //days
+t= 1620 //years
+//CALCULATIONS
+NRn= th/(Mr*t*365.26)
+V= NRn*R*(273+T)*1000/p
+//RESULTS
+printf ('millilitres of radon = %.2e ml',V)
diff --git a/1439/CH24/EX24.4/24_4.sce b/1439/CH24/EX24.4/24_4.sce new file mode 100755 index 000000000..3b1700f95 --- /dev/null +++ b/1439/CH24/EX24.4/24_4.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+mli= 7.01822 //amu
+mH= 1.00814 //amu
+mHe= 4.00387 //amu
+n=2
+E= 931 //Mev/amu
+//CALCULATIONS
+dE= E*(-n*mHe+mH+mli)
+//RESULTS
+printf ('total energy of this reaction = %.2f Mev',dE)
diff --git a/1439/CH24/EX24.5/24_5.sce b/1439/CH24/EX24.5/24_5.sce new file mode 100755 index 000000000..675c4fbe7 --- /dev/null +++ b/1439/CH24/EX24.5/24_5.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+mr= 2.01474 //amu
+mH= 0.00237 //amu
+mD= 1.00814 //amu
+//CALCULATIONS
+mn= mr+mH-mD
+//RESULTS
+printf ('mass of neutron = %.5f amu',mn)
diff --git a/1439/CH24/EX24.6/24_6.sce b/1439/CH24/EX24.6/24_6.sce new file mode 100755 index 000000000..0f8aa5708 --- /dev/null +++ b/1439/CH24/EX24.6/24_6.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+t= 1600 //years
+M= 226 //gms
+k= 3.7*10^10 //disintegrations per second
+//CALCULATIONS
+wl= 0.693/(t*365*24*60*60)
+r= wl*6.02*10^23/M
+//RESULTS
+printf ('wavelength = %.1e disintegrations per second',r)
diff --git a/1439/CH24/EX24.8/24_8.sce b/1439/CH24/EX24.8/24_8.sce new file mode 100755 index 000000000..b815279f9 --- /dev/null +++ b/1439/CH24/EX24.8/24_8.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+ku= 1.52*10^-10 //year^-1
+ru= 0.0453
+ru1= 1.0523
+Mu= 238 //gms
+mu= 206 //gms
+//CALCULATIONS
+dt= ru*Mu/(ku*ru1*mu)
+t= 2.303*log10(ru1/(ru1-(ru*Mu/mu)))/(ku*10^6)
+//RESULTS
+printf ('age of pitchblende = %.f million years',t)
diff --git a/1439/CH3/EX3.1/3_1.sce b/1439/CH3/EX3.1/3_1.sce new file mode 100755 index 000000000..02a489183 --- /dev/null +++ b/1439/CH3/EX3.1/3_1.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+R= 1.987 //cal mol^-1 K^-1
+T= 0 //C
+V1= 22.4 //lit
+V2= 2.24 //lit
+//CALCULATIONS
+wrev= 2.303*R*(273.1+T)*log10(V1/V2)
+//RESULTS
+printf ('maximum work done= % f cal ',wrev)
diff --git a/1439/CH3/EX3.4/3_4.sce b/1439/CH3/EX3.4/3_4.sce new file mode 100755 index 000000000..bb7221f0b --- /dev/null +++ b/1439/CH3/EX3.4/3_4.sce @@ -0,0 +1,5 @@ +clc
+//initialisation of variables
+Cp= 0.096 //cal deg g^-1
+//RESULTS
+printf ('Cp of zinc at constant pressure a room temperature= % 3f cal deg g^-1',Cp)
diff --git a/1439/CH4/EX4.1/4_1.sce b/1439/CH4/EX4.1/4_1.sce new file mode 100755 index 000000000..f5abff4aa --- /dev/null +++ b/1439/CH4/EX4.1/4_1.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+E= -1148.93 //kcal mole^-1
+R= 1.987 //cal mole^-1 K^-1
+T= 25 //C
+n=4
+//CALCULATIONS
+E1= (E*1000-R*n*(273.1+T))/1000
+//RESULTS
+printf ('heat absorbed= %.2f kcal mole^-1',E1)
diff --git a/1439/CH4/EX4.10/4_10.sce b/1439/CH4/EX4.10/4_10.sce new file mode 100755 index 000000000..38e98885a --- /dev/null +++ b/1439/CH4/EX4.10/4_10.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+HNaCl= -97.219 //kcal
+HH2O= -68.3174 //kcal
+HHcl= -39.713 //kcal
+HNaOH= -112.108 //kcal
+//CALCULATIONS
+H298= HNaCl+HH2O-HHcl-HNaOH
+//RESULTS
+printf ('dH298= %.3f kcal ',H298)
diff --git a/1439/CH4/EX4.11/4_11.sce b/1439/CH4/EX4.11/4_11.sce new file mode 100755 index 000000000..94ed06484 --- /dev/null +++ b/1439/CH4/EX4.11/4_11.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+T1= 1000 //K
+T2= 300 //K
+k1= 6.0954 //cal deg^-1 mole^-1
+k2= 3.2533*10^-3 //cal deg^-2 mole^-1
+k3= -1.071*10^-6 //cal deg^-3 mole^-1
+//CALCULATIONS
+dH= k1*(T1-T2)+(k2*(T1^2-T2^2)/2)+(k3*(T1^3-T2^3)/3)
+//RESULTS
+printf ('dH= %.f cal mole^-1',dH)
diff --git a/1439/CH4/EX4.12/4_12.sce b/1439/CH4/EX4.12/4_12.sce new file mode 100755 index 000000000..8580c5aa3 --- /dev/null +++ b/1439/CH4/EX4.12/4_12.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+dH273= -79.7 //cal g^-1
+T1= 263 //K
+T2= 273 //K
+dCp= -0.51 //cal mole^-1 deg^-1
+//CALCULATIONS
+H263= dH273+dCp*(T1-T2)
+//RESULTS
+printf ('H263= %.1f cal g^-1',H263)
diff --git a/1439/CH4/EX4.13/4_13.sce b/1439/CH4/EX4.13/4_13.sce new file mode 100755 index 000000000..223a4cb4e --- /dev/null +++ b/1439/CH4/EX4.13/4_13.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+dH293= -115595.8 //cal
+T1= 1500 //K
+T2= 298 //K
+k1= -5.6146 //cal deg^-1 mole^-1
+k2= 1.8931*10^-3 //cal deg^-2 mole^-1
+k3= 4.723*10^-7 //cal deg^-3 mole^-1
+//CALCULATIONS
+dH=dH293+ k1*(T1-T2)+(k2*(T1^2-T2^2)/2)+(k3*(T1^3-T2^3)/3)
+//RESULTS
+printf ('dH1500= %.f cal ',dH)
diff --git a/1439/CH4/EX4.2/4_2.sce b/1439/CH4/EX4.2/4_2.sce new file mode 100755 index 000000000..34a86d97c --- /dev/null +++ b/1439/CH4/EX4.2/4_2.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+Hr1= -71.03 //kcal
+Hr2= 70.96 //kcal
+//CALCULATIONS
+H= Hr1+Hr2
+//RESULTS
+printf ('Enthalpy of transition= %.2f kcal',H)
diff --git a/1439/CH4/EX4.3/4_3.sce b/1439/CH4/EX4.3/4_3.sce new file mode 100755 index 000000000..462dea867 --- /dev/null +++ b/1439/CH4/EX4.3/4_3.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+Hr1= -70.96 //kcal
+Hr2= -23.49 //kcal
+Hr3= -31.14 //kcal
+Hr4= -68.32 //kcal
+//CALCULATIONS
+H= Hr1+Hr2+Hr3+Hr4
+//RESULTS
+printf ('Enthalpy of formation= %.2f kcal',H)
diff --git a/1439/CH4/EX4.4/4_4.sce b/1439/CH4/EX4.4/4_4.sce new file mode 100755 index 000000000..c52cacf08 --- /dev/null +++ b/1439/CH4/EX4.4/4_4.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+dH= -310.615 //kcal
+HfCO2= -94.52 //kcal
+HfH2O= -68.3174 //kcal
+//CALCULATIONS
+HfCH2= -dH+2*HfCO2+HfH2O
+//RESULTS
+printf ('Enthalpy of formation of acetylene= %.3f kcal mole^-1',HfCH2)
diff --git a/1439/CH4/EX4.5/4_5.sce b/1439/CH4/EX4.5/4_5.sce new file mode 100755 index 000000000..c2d520226 --- /dev/null +++ b/1439/CH4/EX4.5/4_5.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+dH= -687.982 //kcal
+HCO2= -94.0518 //kcal
+HH2O= -68.3174 //kcal
+//CALCULATIONS
+H= -dH+4*HCO2+5*HH2O
+//RESULTSn
+printf ('Enthalpy of formation of n butane= %.3f kcal mole^-1',H)
diff --git a/1439/CH4/EX4.6/4_6.sce b/1439/CH4/EX4.6/4_6.sce new file mode 100755 index 000000000..d652ae9dc --- /dev/null +++ b/1439/CH4/EX4.6/4_6.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+HfAlO2= -399.1 //kcal
+HfFe2O2= -196.5 //kcal
+//CALCULATIONS
+dH= HfAlO2-HfFe2O2
+//RESULTS
+printf ('Enthalpy change= %.1f kcal mole^-1',dH)
diff --git a/1439/CH4/EX4.7/4_7.sce b/1439/CH4/EX4.7/4_7.sce new file mode 100755 index 000000000..454bfa442 --- /dev/null +++ b/1439/CH4/EX4.7/4_7.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+Hr= -17.74 //kcal
+Hr1= 15.31 //kcal
+//CALCULATIONS
+dH= Hr+Hr1
+//RESULTS
+printf ('integral heat of dilution= %.2f kcal ',dH)
diff --git a/1439/CH4/EX4.8/4_8.sce b/1439/CH4/EX4.8/4_8.sce new file mode 100755 index 000000000..18e107901 --- /dev/null +++ b/1439/CH4/EX4.8/4_8.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+dHr= -0.56 //kcal
+dHr1= -18.85 //kcal
+//CALCULATIONS
+dH= dHr+dHr1
+//RESULTS
+printf ('integral heat of hydration= %.2f kcal ',dH)
diff --git a/1439/CH4/EX4.9/4_9.sce b/1439/CH4/EX4.9/4_9.sce new file mode 100755 index 000000000..9893e7f32 --- /dev/null +++ b/1439/CH4/EX4.9/4_9.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+HfHcl= -22.063 //kcal
+H298= -17.74 //kcal
+//CALCULATIONS
+HfHcl200H2O= HfHcl+H298
+//RESULTS
+printf ('enthalpy of formation= %.2f kcal mole^-1',HfHcl200H2O)
diff --git a/1439/CH5/EX5.1/5_1.sce b/1439/CH5/EX5.1/5_1.sce new file mode 100755 index 000000000..ad41b2677 --- /dev/null +++ b/1439/CH5/EX5.1/5_1.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+q2= 1000 //cal
+T2= 100 //C
+T1= 20 //C
+//CALCULATIONS
+wmax= q2*(T2-T1)/(273.1+T2)
+//RESULTS
+printf ('maximum work= %.f cal ',wmax)
diff --git a/1439/CH5/EX5.10/5_10.sce b/1439/CH5/EX5.10/5_10.sce new file mode 100755 index 000000000..1786e0039 --- /dev/null +++ b/1439/CH5/EX5.10/5_10.sce @@ -0,0 +1,22 @@ +clc
+//initialisation of variables
+R= 1.987 //cal deg^-1 mole^-1
+T= 27 //C
+V1= 24.62 //lit
+V2= 2.462 //lit
+//CALCULATIONS
+wmax= 2.303*R*(273.1+T)*log10(V1/V2)
+dA= - wmax
+dE= 0
+q= dE+wmax
+dH=0
+dG= -R*(273.1+T)*2.303
+dS= dG/(273.1+T)
+dS1= (dH-dG)/(273.1+T)
+//RESULTS
+printf ('W= %.f cal mole^-1',wmax)
+printf ('\n q= %.f cal mole^-1',q)
+printf ('\n dE= %.f cal mole^-1',dE)
+printf ('\n dA= %.f cal mole^-1',dA)
+printf ('\n dS= %.2f cal deg^-1 mole^-1',dS1)
+printf ('\n dG= %.2f cal mole^-1',dG)
diff --git a/1439/CH5/EX5.2/5_2.sce b/1439/CH5/EX5.2/5_2.sce new file mode 100755 index 000000000..8ceb14223 --- /dev/null +++ b/1439/CH5/EX5.2/5_2.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+dH= 6896 //cal mole^-1
+T= 68.7 //C
+//CALCULATIONS
+dS= dH/(273.1+T)
+//RESULTS
+printf ('entropy change per mole= %.2f cal deg^-1 mole^-1',dS)
diff --git a/1439/CH5/EX5.3/5_3.sce b/1439/CH5/EX5.3/5_3.sce new file mode 100755 index 000000000..12c135e7d --- /dev/null +++ b/1439/CH5/EX5.3/5_3.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+Cp= 6.09 //cal deg^-1 mole^-1
+T1= 30 //C
+T2= 0 //C
+//CALCULATIONS
+dS= 2.303*Cp*log10((273+T1)/(273+T2))
+//RESULTS
+printf ('increase in entropy= %.3f cal deg^-1 mole^-1',dS)
diff --git a/1439/CH5/EX5.4/5_4.sce b/1439/CH5/EX5.4/5_4.sce new file mode 100755 index 000000000..8c5ce200b --- /dev/null +++ b/1439/CH5/EX5.4/5_4.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+T1= 25 //C
+T2= 600 //C
+k1= 6.0954
+k2= 3.2533*10^-3 //K
+k3= -10.71*10^-7 //K^-1
+//CALCULATIONS
+dS= k1*2.303*log10((273+T2)/(273+T1))+k2*(T2-T1)+(k3/2)*((273+T2)^2-(273+T1)^2)
+//RESULTS
+printf ('increase in entropy= %.2f cal deg^-1 mole^-1',dS)
diff --git a/1439/CH5/EX5.5/5_5.sce b/1439/CH5/EX5.5/5_5.sce new file mode 100755 index 000000000..ac4cf5d3d --- /dev/null +++ b/1439/CH5/EX5.5/5_5.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+n= 2 //mole
+R= 1.987 //cal K^-1 mole^-1
+X1= 0.5 //atm
+X2= 0.5 //atm
+//CALCULATIONS
+S= -2.303*n*R*(X1*log10(X1)+X2*log10(X2))
+//RESULTS
+printf ('change in entropy= %.2f cal deg^-1 mole^-1',S)
diff --git a/1439/CH5/EX5.6/5_6.sce b/1439/CH5/EX5.6/5_6.sce new file mode 100755 index 000000000..d8908bf5f --- /dev/null +++ b/1439/CH5/EX5.6/5_6.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+SH2O= 45.106 //cal deg^-1 mole^-1
+SH2= 31.211 //cal deg^-1 mole^-1
+SO2= 49.003 //cal deg^-1 mole^-1
+//CALCULATIONS
+dS= SH2O-SH2-0.5*SO2
+//RESULTS
+printf ('change in entropy= %.3f cal deg^-1 mole^-1',dS)
diff --git a/1439/CH5/EX5.7/5_7.sce b/1439/CH5/EX5.7/5_7.sce new file mode 100755 index 000000000..e480693b6 --- /dev/null +++ b/1439/CH5/EX5.7/5_7.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+n= 2 //moles
+p= 1 //atm
+p1= 0.1 //atm
+T= 25 //C
+R= 1.987 //cal mole^-1 K^-1
+//CALCULATIONS
+dG= n*R*2.303*log10(p1/p)*(273+T)
+//RESULTS
+printf ('change in Gibbs free energy= %.f cal ',dG)
diff --git a/1439/CH5/EX5.8/5_8.sce b/1439/CH5/EX5.8/5_8.sce new file mode 100755 index 000000000..e7bca42e1 --- /dev/null +++ b/1439/CH5/EX5.8/5_8.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+R= 1.987 //cal mole^-1 K^-1
+T= -10 //C
+P1= 2.149 //mm
+P2= 1.950 //mm
+//CALCULATIONS
+dG= R*2.303*(273+T)*log10(P2/P1)
+//RESULTS
+printf ('change in Gibbs free energy= %.f cal mole^-1',dG)
diff --git a/1439/CH5/EX5.9/5_9.sce b/1439/CH5/EX5.9/5_9.sce new file mode 100755 index 000000000..2acb0982a --- /dev/null +++ b/1439/CH5/EX5.9/5_9.sce @@ -0,0 +1,20 @@ +clc
+//initialisation of variables
+T= 100 //C
+R= 1.987 //cal mole^-1 K^-1
+H= 539.7 //cal g^-1
+M= 18 //g mole^-1
+//CALCULATIONS
+w= -R*(273+T)
+qp= -H*M
+dE= qp-w
+dA= -w
+dS= qp/(273+T)
+dG= qp-(273+T)*dS
+//RESULTS
+printf ('W= %.f cal mole^-1',w)
+printf ('\n qp= %.f cal mole^-1',qp)
+printf ('\n dE= %.f cal mole^-1',dE)
+printf ('\n dA= %.f cal mole^-1',dA)
+printf ('\n dS= %.f cal deg^-1 mole^-1',dS)
+printf ('\n dG= %.f cal mole^-1',dG)
diff --git a/1439/CH6/EX6.1/6_1.sce b/1439/CH6/EX6.1/6_1.sce new file mode 100755 index 000000000..b09a827bc --- /dev/null +++ b/1439/CH6/EX6.1/6_1.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+G= 28.6 //gms
+R= 0.08205 //l-atm mole^-1 deg^-1
+T= 30 //C
+M= 153.8 //gms
+v= 20.01 //l
+//CAALCULATIONS
+p= G*R*(273.1+T)*760/(M*v)
+p1= p/(1+(p/760))
+//RESULTS
+printf ('vapour pressure using ideal gas = %.f mm',p)
+printf ('\n vapour pressure using equation = %.f mm',p1)
+
diff --git a/1439/CH6/EX6.2/6_2.sce b/1439/CH6/EX6.2/6_2.sce new file mode 100755 index 000000000..35c425b0b --- /dev/null +++ b/1439/CH6/EX6.2/6_2.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+T= 100 //C
+Vv= 30.199 //l mole^-1
+Vl= 0.01878 //l mole^-1
+H= 539.7//cal g^-1
+m= 18.01 //g mole^-1
+R= 0.04129 //l-atm cal^-1
+//CALCULATIONS
+r= H*m*R*760/((273.1+T)*(Vv-Vl))
+r1= 1/r
+//RESULTS
+printf ('change in boling point of water per mm = %.3f deg mm^-1',r1)
+
diff --git a/1439/CH6/EX6.3/6_3.sce b/1439/CH6/EX6.3/6_3.sce new file mode 100755 index 000000000..b62b93bb0 --- /dev/null +++ b/1439/CH6/EX6.3/6_3.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+T= 0 //C
+H= 79.7 //cal g^-1
+vd= -9.06*10^-5 //l g^-1
+R= 0.04129 //l-atm cal^-1
+//CALCULATIONS
+r= H*R/((273.15+T)*vd)
+//RESULTS
+printf ('change in pressure per degree= %.f atm deg^-1',r)
diff --git a/1439/CH6/EX6.4/6_4.sce b/1439/CH6/EX6.4/6_4.sce new file mode 100755 index 000000000..d2f86a61f --- /dev/null +++ b/1439/CH6/EX6.4/6_4.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+y1= 32.47*10^-4
+y2= 34.71*10^-4
+x1= 1.625
+x2= 1.107
+R= 1.987 //cal mole^-1 K^-1
+//CALCULATIONS
+slope= (x2-x1)/(y2-y1)
+Hvap= -slope*2.303*R
+//RESULTS
+printf ('Heat of vapourization= %.f cal mole^-1',Hvap)
diff --git a/1439/CH6/EX6.5/6_5.sce b/1439/CH6/EX6.5/6_5.sce new file mode 100755 index 000000000..3d161e11b --- /dev/null +++ b/1439/CH6/EX6.5/6_5.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+H= 342 //cal mole^-1 g^-1
+G= 21 //gms
+T= 60 //C
+R= 1.987 //cal / mol K
+//CALCULATIONS
+Hvap= G*H
+P1= 1/(%e^(Hvap*9/(2.303*R*(273.1+T)*H)))
+//RESULTS
+printf ('molar heat of vapourization = %.f cal mole^-1',Hvap)
+
diff --git a/1439/CH7/EX7.1/7_1.sce b/1439/CH7/EX7.1/7_1.sce new file mode 100755 index 000000000..09b721732 --- /dev/null +++ b/1439/CH7/EX7.1/7_1.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+nb= 0.4
+pb= 385 //mm
+nt= 0.6
+pt= 139 //mm
+//CALCULATIONS
+Pb= pb*nb
+Pt= pt*nt
+PT= Pb+Pt
+Xt= Pt/PT
+//RESULTS
+printf ('mole fraction of benzene vapour= % 3f ',Xt)
diff --git a/1439/CH7/EX7.2/7_2.sce b/1439/CH7/EX7.2/7_2.sce new file mode 100755 index 000000000..1f68dfeca --- /dev/null +++ b/1439/CH7/EX7.2/7_2.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+K= 1.25*10^6
+m= 1000 //gms
+M= 18.02 //gms
+//CALCULATIONS
+nco2= 760*m/(M*K)
+//RESULTS
+printf ('moles of carbon dioxide= % 2e mole litre^-1',nco2)
diff --git a/1439/CH7/EX7.3/7_3.sce b/1439/CH7/EX7.3/7_3.sce new file mode 100755 index 000000000..f42a94f36 --- /dev/null +++ b/1439/CH7/EX7.3/7_3.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+Vp= 1022 //mm
+Vp1= 406 //mm
+//CALCULATIONS
+Xb= (760-Vp1)/(Vp-Vp1)
+Xb1= Vp*Xb/760
+//RESULTS
+printf ('mole fraction of benzene= % 3f ',Xb)
+printf ('\n mole fraction of benzene vapour= % 3f ',Xb1)
diff --git a/1439/CH7/EX7.4/7_4.sce b/1439/CH7/EX7.4/7_4.sce new file mode 100755 index 000000000..8c1e056ee --- /dev/null +++ b/1439/CH7/EX7.4/7_4.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+P1= 731.9 //mm
+P2= 712.4 //mm
+Mb= 18 //gms
+r= 0.188
+//CALCULATIONS
+Ma= r*Mb*P2/(P1-P2)
+//RESULTS
+printf ('molecular weight of nitro-benzene= % f g mole^-1',Ma)
diff --git a/1439/CH8/EX8.2/8_2.sce b/1439/CH8/EX8.2/8_2.sce new file mode 100755 index 000000000..ad1ec3544 --- /dev/null +++ b/1439/CH8/EX8.2/8_2.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+R= 1.987 //cal/mole K
+T= 100 //C
+M1= 18.02 //gms
+Hvap= 539.7 //cal g^-1
+//CALCULATIONS
+Kb= R*(273.1+T)^2*M1/(1000*M1*Hvap)
+//RESULTS
+printf ('molal boiling point constant= %.3f deg molal^-1',Kb)
diff --git a/1439/CH8/EX8.3/8_3.sce b/1439/CH8/EX8.3/8_3.sce new file mode 100755 index 000000000..7af4569be --- /dev/null +++ b/1439/CH8/EX8.3/8_3.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+Kb= 2.53 //deg molal^-1
+w2= 1 //gms
+Tb= 0.3 //C
+w1= 50 //gms
+//CALCULATIONS
+M2= Kb*w2*1000/(Tb*w1)
+//RESULTS
+printf ('molecular weight of dinitrozene = %.f g mole^-1',M2)
diff --git a/1439/CH8/EX8.4/8_4.sce b/1439/CH8/EX8.4/8_4.sce new file mode 100755 index 000000000..7229c8ca4 --- /dev/null +++ b/1439/CH8/EX8.4/8_4.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+mu= 5 //gms
+Mu= 60.06 //gms
+mw= 75 //gms
+//CALCULATIONS
+Tb= 0.513*mu*1000/(Mu*mw)
+//RESULTS
+printf ('boiling water of a solution= %.3f deg',Tb)
diff --git a/1439/CH8/EX8.5/8_5.sce b/1439/CH8/EX8.5/8_5.sce new file mode 100755 index 000000000..f780ddae1 --- /dev/null +++ b/1439/CH8/EX8.5/8_5.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+R= 1.987 //cal mole^-1 K^-1
+T= 0 //C
+M= 18.02 //gms
+Hf= 79.7 //cal g^-1
+//CALCULATIONS
+Kf= R*(273.1+T)^2*M/(1000*M*Hf)
+//RESULTS
+printf ('Kf of water= %.2f deg molal^-1',Kf)
diff --git a/1439/CH8/EX8.6/8_6.sce b/1439/CH8/EX8.6/8_6.sce new file mode 100755 index 000000000..ba5202d01 --- /dev/null +++ b/1439/CH8/EX8.6/8_6.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+M= 18.02 //g mole^-1
+d= 0.99564 //g/cc
+R= 0.08205 //l-atm deg^-1 mole^-1
+T= 30 //C
+P1= 31.824 //mm
+P10= 31.207 //mm
+//CALCULATIONS
+p= R*(273.15+T)*2.303*1000*d*log10(P1/P10)/M
+//RESULTS
+printf ('osmotic pressure of sucrose solution= %.1f atm',p)
diff --git a/1439/CH8/EX8.7/8_7.sce b/1439/CH8/EX8.7/8_7.sce new file mode 100755 index 000000000..3511f0a62 --- /dev/null +++ b/1439/CH8/EX8.7/8_7.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+R= 0.082 //l-atm / mol ^-1 K^-1
+T= 30 //C
+V= 1 //l
+//CALCULATIONS
+p= R*(273.15+T)/V
+//RESULTS
+printf ('osmotic pressure of sucrose solution= %.1f atm',p)
diff --git a/1439/CH9/EX9.1/9_1.sce b/1439/CH9/EX9.1/9_1.sce new file mode 100755 index 000000000..04a0f630c --- /dev/null +++ b/1439/CH9/EX9.1/9_1.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+T= 400 //C
+R= 0.08205 //l-atm mole^-1 deg^-1
+Kp= 1.64*10^-4
+n= 2
+P= 10 //atm
+//CALCULATIONS
+Kc= Kp*(R*(273.1+T))^n
+Kx= Kp*P^n
+//RESULTS
+printf ('Kc= %.1f l^2 mole^-2 ',Kc)
+printf ('\n Kx= %.2e ',Kx)
diff --git a/1439/CH9/EX9.10/9_10.sce b/1439/CH9/EX9.10/9_10.sce new file mode 100755 index 000000000..fd8525929 --- /dev/null +++ b/1439/CH9/EX9.10/9_10.sce @@ -0,0 +1,7 @@ +clc
+//initialisation of variables
+n= 0.6667 //mole
+//CALCULATIONS
+K= n^2/((1-n)^2)
+//RESULTS
+printf ('K= %.f ',K)
diff --git a/1439/CH9/EX9.11/9_11.sce b/1439/CH9/EX9.11/9_11.sce new file mode 100755 index 000000000..72be014dd --- /dev/null +++ b/1439/CH9/EX9.11/9_11.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+pN2O4= 0.141 //atm
+pNO2= 1 //atm
+R= 1.987 //cal mole^-1 deg^-1
+T= 25 //C
+//CALCULATIONS
+dG= -R*2.303*(273.1+T)*log10(pN2O4/pNO2^2)
+//RESULTS
+printf ('dG= %.f cal ',dG)
diff --git a/1439/CH9/EX9.12/9_12.sce b/1439/CH9/EX9.12/9_12.sce new file mode 100755 index 000000000..b3585fcc5 --- /dev/null +++ b/1439/CH9/EX9.12/9_12.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+pN2O4= 1 //atm
+pNO2= 0.141 //atm
+R= 1.987 //cal mole^-1 deg^-1
+T= 25 //C
+//CALCULATIONS
+dG= -R*2.303*(273.1+T)*log10(pN2O4/pNO2)
+//RESULTS
+printf ('dG= %.f cal ',dG)
diff --git a/1439/CH9/EX9.13/9_13.sce b/1439/CH9/EX9.13/9_13.sce new file mode 100755 index 000000000..589862a7b --- /dev/null +++ b/1439/CH9/EX9.13/9_13.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+Kc= 2.7*10^2
+R= 1.987 //cal mole^-1 deg^-1
+T= 43.9 //c
+//CALCULATIONS
+dG= -R*(273.1+T)*2.303*log10(Kc)
+//RESULTS
+printf ('dG= %.1f cal ',dG)
diff --git a/1439/CH9/EX9.14/9_14.sce b/1439/CH9/EX9.14/9_14.sce new file mode 100755 index 000000000..b1fbe0dc8 --- /dev/null +++ b/1439/CH9/EX9.14/9_14.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+dH= -17.889 //cal deg^-1
+T= 25 //C
+dS= -19.28 //cal deg^-1
+R= 1.987 //cal mole^-1 deg^-1
+//CALCULATIONS
+dG= dH-dS*(273.1+T)
+Kp= 10^(dG/(-R*(273.1+T)*2.303))
+///RESULTS
+printf ('Kp= %.1e ',Kp)
+
+
+//ANSWER IN THE TEXTBOOK IS WRONG
diff --git a/1439/CH9/EX9.15/9_15.sce b/1439/CH9/EX9.15/9_15.sce new file mode 100755 index 000000000..35ec0eaa8 --- /dev/null +++ b/1439/CH9/EX9.15/9_15.sce @@ -0,0 +1,15 @@ +clc
+//initialisation of variables
+HCO2= -94.2598 //kcal
+HH2= 0 //kcal
+HCO= -32.8079 //kcal
+HH2O= -54.6357 //kcal
+R= 1.987 //cal deg^-1 mole^-1
+T= 25 //C
+//CALCULATIONS
+Kp= 10^(-(HCO2-HCO-HH2O)/(R*2.303*(273.1+T)))
+//RESULTS
+printf ('Kp= %.2e ',Kp)
+
+
+//ANSWER IN THE TEXTBOO IS WRONG
diff --git a/1439/CH9/EX9.16/9_16.sce b/1439/CH9/EX9.16/9_16.sce new file mode 100755 index 000000000..3e1f3d26e --- /dev/null +++ b/1439/CH9/EX9.16/9_16.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+G0= 1161 //cal
+R= 1.987 //cal mole^-1 deg^-1
+T= 25 //C
+P= 1 //atm
+P1= 10 //atm
+//CALCULATIONS
+dG= G0+R*(273+T)*2.303*log10(P^2/P1)
+//RESULTS
+printf ('dG= %.f cal ',dG)
diff --git a/1439/CH9/EX9.17/9_17.sce b/1439/CH9/EX9.17/9_17.sce new file mode 100755 index 000000000..e6ab1438f --- /dev/null +++ b/1439/CH9/EX9.17/9_17.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+K2500= 3.6*10^-3
+K2000= 4.08*10^-4
+R= 1.987 //cal mole^-1 K^-1
+T1= 2500 //K
+T2= 2000 //K
+//CALCULATIONS
+dH= log10(K2500/K2000)*2.303*R*T1*T2/(T1-T2)
+//RESULTS
+printf ('enthaly change= %.f cal ',dH)
diff --git a/1439/CH9/EX9.18/9_18.sce b/1439/CH9/EX9.18/9_18.sce new file mode 100755 index 000000000..6dd453203 --- /dev/null +++ b/1439/CH9/EX9.18/9_18.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+dH= -10200 ///cal
+R= 1.987 //cal deg^-1 mole^-1
+T1= 690 //K
+T2= 800 //K
+KT1= 10
+//CALCULATIONS
+KT2= KT1*10^(dH*(T2-T1)/(2.303*R*T1*T2))
+//RESULTS
+printf ('K800= %.2f ',KT2)
diff --git a/1439/CH9/EX9.19/9_19.sce b/1439/CH9/EX9.19/9_19.sce new file mode 100755 index 000000000..18d5e5a68 --- /dev/null +++ b/1439/CH9/EX9.19/9_19.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+T= 1000 //K
+R= 1.987 //cal mole^-1 K^-1
+G= -1330 //cal mole^-1
+//CALCULATIONS
+Kp= 10^(G/(-R*T*2.303))
+//RESULTS
+printf ('Kp= %.2f ',Kp)
diff --git a/1439/CH9/EX9.2/9_2.sce b/1439/CH9/EX9.2/9_2.sce new file mode 100755 index 000000000..6402a3015 --- /dev/null +++ b/1439/CH9/EX9.2/9_2.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+R= 0.08205 //l-atm mole^-1 deg^-1
+T= 25 //C
+g= 1.588 //gms
+P= 1 //atm
+V= 0.5 //lit
+M1= 92.02 //g mole^-1
+//CALCULATIONS
+M2= R*(273.1+T)*g/(P*V)
+a= (M1-M2)/M2
+//RESULTS
+printf ('degree of dissociation= %.4f ',a)
diff --git a/1439/CH9/EX9.20/9_20.sce b/1439/CH9/EX9.20/9_20.sce new file mode 100755 index 000000000..25d31a91f --- /dev/null +++ b/1439/CH9/EX9.20/9_20.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+Kp= 1.78
+P= 0.1 //atm
+//CALCULATIONS
+a= sqrt(Kp/(Kp+P))*100
+//RESULTS
+printf ('per cent dissaciated= %.1f per cent ',a)
diff --git a/1439/CH9/EX9.21/9_21.sce b/1439/CH9/EX9.21/9_21.sce new file mode 100755 index 000000000..dd8dfbf39 --- /dev/null +++ b/1439/CH9/EX9.21/9_21.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+R= 1.987 //cal mole^-1 K^-1
+T= 2000 //K
+dH= 117172 //cal mole^-1
+H= -43 //cal mole^-1
+n= 2
+H1= -56.12 //cal mole^-1
+//CALCULATIONS
+K= 10^(-(1/(2.303*R))*((dH/T)+n*H-H1))
+//RESULTS
+printf ('equilibrium constant= %.1e ',K)
diff --git a/1439/CH9/EX9.22/9_22.sce b/1439/CH9/EX9.22/9_22.sce new file mode 100755 index 000000000..6c5790f73 --- /dev/null +++ b/1439/CH9/EX9.22/9_22.sce @@ -0,0 +1,16 @@ +clc
+//initialisation of variables
+T= 25 //C
+R= 1.987 //cal mole^-1 K^-1
+n= 2
+dH= -21.840 //cal mole^-1
+HHCl= -37.73 //cal mole^-1
+HH2= -24.44 //cal mole^-1
+HCl= -45.95 //cal mole^-1
+//CALCULATIONS
+K= 10^((-1/(2.303*R))*((dH*n/(273.15+T))+n*HHCl-HH2-HCl))
+//RESULTS
+printf ('equilibrium constant= %.1e ',K)
+
+
+//ANSWER IN THE TEXTBOOK IS WRONG
diff --git a/1439/CH9/EX9.3/9_3.sce b/1439/CH9/EX9.3/9_3.sce new file mode 100755 index 000000000..33425311e --- /dev/null +++ b/1439/CH9/EX9.3/9_3.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+P= 1 //atm
+a= 18.46 //per cent
+P1= 0.5 //atm
+//CALCULATIONS
+Kp= P*4*(a/100)^2/(1-(a/100)^2)
+//RESULTS
+printf ('Kp= %.3f ',Kp)
+
diff --git a/1439/CH9/EX9.4/9_4.sce b/1439/CH9/EX9.4/9_4.sce new file mode 100755 index 000000000..4160b792f --- /dev/null +++ b/1439/CH9/EX9.4/9_4.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+M1= 208.3 //gms
+g= 2.69 //gms
+R= 0.08205 //l-atm mole^-1 deg^-1
+T= 250 //C
+P= 1 //atm
+V= 1 //lit
+//CALCULATIONS
+M2= g*R*(273.1+T)/(P*V)
+a= (M1-M2)/M2
+Kp= a^2*P/(1-a^2)
+//RESULTS
+printf ('Kp= %.2f ',Kp)
diff --git a/1439/CH9/EX9.5/9_5.sce b/1439/CH9/EX9.5/9_5.sce new file mode 100755 index 000000000..be90d539e --- /dev/null +++ b/1439/CH9/EX9.5/9_5.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+x= 0.0574 //mole
+n= 0.1 //mole
+//CALCULATIONS
+a= x/n
+//RESULTS
+printf ('degree of dissociation= %.3f ',a)
diff --git a/1439/CH9/EX9.6/9_6.sce b/1439/CH9/EX9.6/9_6.sce new file mode 100755 index 000000000..24ea0dead --- /dev/null +++ b/1439/CH9/EX9.6/9_6.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+R= 0.08205 //l-atm mole^-1 deg^-1
+T= 250 //C
+n= 0.1 //mole
+Kp= 1.78
+//CALCULATIONS
+x= n+(n^2*R*(273.1+T)/Kp)
+//RESULTS
+printf ('x= %.3f mole ',x)
diff --git a/1439/CH9/EX9.7/9_7.sce b/1439/CH9/EX9.7/9_7.sce new file mode 100755 index 000000000..b96ffa39f --- /dev/null +++ b/1439/CH9/EX9.7/9_7.sce @@ -0,0 +1,9 @@ +clc
+//initialisation of variables
+Ppcl5= 1 //atm
+Kp= 1.78
+//CALCULATIONS
+Ppcl2= sqrt(Kp)
+P= 2*Ppcl2+Ppcl5
+//RESULTS
+printf ('P= %.2f atm ',P)
diff --git a/1439/CH9/EX9.8/9_8.sce b/1439/CH9/EX9.8/9_8.sce new file mode 100755 index 000000000..11fb994b6 --- /dev/null +++ b/1439/CH9/EX9.8/9_8.sce @@ -0,0 +1,8 @@ +clc
+//initialisation of variables
+Kp= 1.78
+a= 0.2
+//CALCULATIONS
+P= Kp*(1-a^2)/a^2
+//RESULTS
+printf ('Kp= %.1f atm ',P)
|