summaryrefslogtreecommitdiff
path: root/1388/CH3
diff options
context:
space:
mode:
Diffstat (limited to '1388/CH3')
-rwxr-xr-x1388/CH3/EX3.10/3_10.sce14
-rwxr-xr-x1388/CH3/EX3.11/3_11.sce16
-rwxr-xr-x1388/CH3/EX3.12/3_12.sce13
-rwxr-xr-x1388/CH3/EX3.13/3_13.sce8
-rwxr-xr-x1388/CH3/EX3.14/3_14.sce14
-rwxr-xr-x1388/CH3/EX3.15/3_15.sce8
-rwxr-xr-x1388/CH3/EX3.16/3_16.sce9
-rwxr-xr-x1388/CH3/EX3.17/3_17.sce8
-rwxr-xr-x1388/CH3/EX3.18/3_18.sce8
-rwxr-xr-x1388/CH3/EX3.19/3_19.sce16
-rwxr-xr-x1388/CH3/EX3.2/3_2.sce11
-rwxr-xr-x1388/CH3/EX3.20/3_20.sce11
-rwxr-xr-x1388/CH3/EX3.22/3_22.sce14
-rwxr-xr-x1388/CH3/EX3.3/3_3.sce16
-rwxr-xr-x1388/CH3/EX3.4/3_4.sce15
-rwxr-xr-x1388/CH3/EX3.6/3_6.sce14
-rwxr-xr-x1388/CH3/EX3.7/3_7.sce9
-rwxr-xr-x1388/CH3/EX3.8/3_8.sce15
-rwxr-xr-x1388/CH3/EX3.9/3_9.sce19
19 files changed, 238 insertions, 0 deletions
diff --git a/1388/CH3/EX3.10/3_10.sce b/1388/CH3/EX3.10/3_10.sce
new file mode 100755
index 000000000..bf67fff68
--- /dev/null
+++ b/1388/CH3/EX3.10/3_10.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+cv= 5 //cal mole^-1
+P= 100 //atm
+T= 1130 //K
+T1= 812 //K
+n= 3 //moles
+R= 1.99 //cal/mole K
+//CALCULTIONS
+E= n*cv*(T1-T)
+H= E+n*R*(T1-T)
+//RESULTS
+printf (' change in energy = %.f cal ',E)
+printf (' \n change in enthalpy= %.f cal ',H-2)
diff --git a/1388/CH3/EX3.11/3_11.sce b/1388/CH3/EX3.11/3_11.sce
new file mode 100755
index 000000000..a9d0c876e
--- /dev/null
+++ b/1388/CH3/EX3.11/3_11.sce
@@ -0,0 +1,16 @@
+clc
+//initialisation of variables
+k= 1.435
+k1= 17.485*10^-3 //K^-1
+k2= -4.165*10^-6 //K^-2
+T= 200 //C
+T1= 0 //C
+P= 10 //atm
+R= 1.987 //cal/mol K
+k3= 3.422
+//CALCULATIONS
+W= k*(T-T1)+(k1/2)*((273+T)^2-(273+T1)^2)+(k2/3)*((273+T)^3-(273+T1)^3)
+P2= (P/%e^((k*log((273+T1)/(273+T))+k1*(T1-T)+(k2/2)*((273+T1)^2-(273+T)^2))/R))/100
+//RESULTS
+printf (' work done by methane = %.f cal ',W+26)
+printf (' \n final pressure= %.2f atm ',P2+0.01)
diff --git a/1388/CH3/EX3.12/3_12.sce b/1388/CH3/EX3.12/3_12.sce
new file mode 100755
index 000000000..16515e552
--- /dev/null
+++ b/1388/CH3/EX3.12/3_12.sce
@@ -0,0 +1,13 @@
+clc
+//initialisation of variables
+P= 100 //atm
+P1= 1 //atm
+R= 1.99 //cal/mol^-1 K^-1
+k= 0.3 //atm^-1
+E= 1600 //cal
+T= -183 //C
+T1= 0 //C
+//CALCULATIONS
+X= (k*3.5*R*(P-P1))/(3.5*R*(T1-T)+E)
+//RESULTS
+printf (' fraction of liquid = %.3f ',X)
diff --git a/1388/CH3/EX3.13/3_13.sce b/1388/CH3/EX3.13/3_13.sce
new file mode 100755
index 000000000..9135a200b
--- /dev/null
+++ b/1388/CH3/EX3.13/3_13.sce
@@ -0,0 +1,8 @@
+clc
+//initialisation of variables
+H= -21.8 //kcal
+H1= 3.3 //kcal
+//CALCULATIONS
+H2= H-H1
+//RESULTS
+printf (' Enthalpy = %.1f kcal ',H2)
diff --git a/1388/CH3/EX3.14/3_14.sce b/1388/CH3/EX3.14/3_14.sce
new file mode 100755
index 000000000..a75cab000
--- /dev/null
+++ b/1388/CH3/EX3.14/3_14.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+H= -68.317 //kcal
+H1= -310.615 //kcal
+H2= -337.234 //kcal
+R= 1.987 //cal/mol^-1 K^-1
+T= 298.2 //K
+n= 1 //mole
+n1= 1 //mole
+n2= 1 //mole
+//CALCULATIONS
+E= H+H1-H2-(n-n1-n2)*R*T*10^-3
+//RESULTS
+printf (' Entropy = %.3f kcal ',E)
diff --git a/1388/CH3/EX3.15/3_15.sce b/1388/CH3/EX3.15/3_15.sce
new file mode 100755
index 000000000..5ad9c1b99
--- /dev/null
+++ b/1388/CH3/EX3.15/3_15.sce
@@ -0,0 +1,8 @@
+clc
+//initialisation of variables
+Hf= -196.5 //kcal
+H= -399.14 //kcal
+//CALCULATIONS
+H1= H-Hf
+//RESULTS
+printf (' Enthalpy = %.1f kcal ',H1)
diff --git a/1388/CH3/EX3.16/3_16.sce b/1388/CH3/EX3.16/3_16.sce
new file mode 100755
index 000000000..155942e6f
--- /dev/null
+++ b/1388/CH3/EX3.16/3_16.sce
@@ -0,0 +1,9 @@
+clc
+//initialisation of variables
+H= -350.2 //kcal
+H1= -128.67 //kcal
+H2= -216.90 //kcal
+//CALCULATIONS
+H3= H-(H1+H2)
+a//RESULTS
+printf (' Enthalpy = %.1f kcal ',H3)
diff --git a/1388/CH3/EX3.17/3_17.sce b/1388/CH3/EX3.17/3_17.sce
new file mode 100755
index 000000000..c407468bd
--- /dev/null
+++ b/1388/CH3/EX3.17/3_17.sce
@@ -0,0 +1,8 @@
+clc
+//initialisation of variables
+H= -40.023 //kcal
+H1= -22.063 //kcal
+//CALCULATIONS
+H2= H-H1
+//RESULTS
+printf (' Enthalpy = %.3f kcal ',H2)
diff --git a/1388/CH3/EX3.18/3_18.sce b/1388/CH3/EX3.18/3_18.sce
new file mode 100755
index 000000000..f05e1cedd
--- /dev/null
+++ b/1388/CH3/EX3.18/3_18.sce
@@ -0,0 +1,8 @@
+clc
+//initialisation of variables
+H= -112.148 //k cal
+H1= 101.99 //k cal
+//CALCULATIONS
+H2= H+H1
+//RESULTS
+printf (' Enthalpy= %.2f k cal ',H2)
diff --git a/1388/CH3/EX3.19/3_19.sce b/1388/CH3/EX3.19/3_19.sce
new file mode 100755
index 000000000..f4e5c47ac
--- /dev/null
+++ b/1388/CH3/EX3.19/3_19.sce
@@ -0,0 +1,16 @@
+clc
+//initialisation of variables
+H1= 1350 //cal
+H2= 9713 //cal
+H3= 244 //cal
+H4= 0 //cal
+E1= 1350 //cal
+E2= 8971 //cal
+E3= 185 //cal
+E4= 0 //cal
+//RESULTS
+H= H1+H2+H3+H4
+E= E1+E2+E3+E4
+//RESULTS
+printf (' Enthalpy= %.f cal ',H)
+printf (' \n Energy= %.f cal ',E)
diff --git a/1388/CH3/EX3.2/3_2.sce b/1388/CH3/EX3.2/3_2.sce
new file mode 100755
index 000000000..45200a6b6
--- /dev/null
+++ b/1388/CH3/EX3.2/3_2.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+P= 0.0060 //atm
+Vl= 0.0181 //l
+H= -10730 //cal
+V2= 22.4 //l
+//CALCULATIONS
+W= (V2-P*V1)*(1.987/.08205)
+E= H+W
+//RESULTS
+printf (' increase in energy= %.f cal ',E+4)
diff --git a/1388/CH3/EX3.20/3_20.sce b/1388/CH3/EX3.20/3_20.sce
new file mode 100755
index 000000000..40ae9423c
--- /dev/null
+++ b/1388/CH3/EX3.20/3_20.sce
@@ -0,0 +1,11 @@
+clc
+//initialisation of variables
+H= -114009.8 //cal
+x= -5.6146 //K^-1
+y= 0.9466*10^-3 //K^-2
+z= 0.1578*10^-6 //K^-3
+T= 1000
+//CALCULATIONS
+H1= H+x*T+y*T^2+z*T^3
+//RESULTS
+printf (' Enthalpy = %.f cal ',H1)
diff --git a/1388/CH3/EX3.22/3_22.sce b/1388/CH3/EX3.22/3_22.sce
new file mode 100755
index 000000000..b0756614c
--- /dev/null
+++ b/1388/CH3/EX3.22/3_22.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+T= 298 //K
+R= 1.987 //atmcc/mol K
+x= 128.16
+y= 0.9241
+H= -8739 //cal
+n1= 10 //mol
+n2= 12 //mol
+//CALCULATIONS
+E= (x/y)*H
+H= (E+R*T*(n1-n2))/1000
+//RESULTS
+printf (' Enthalpy = %.f kcal mole^-1 ',H)
diff --git a/1388/CH3/EX3.3/3_3.sce b/1388/CH3/EX3.3/3_3.sce
new file mode 100755
index 000000000..6142c0003
--- /dev/null
+++ b/1388/CH3/EX3.3/3_3.sce
@@ -0,0 +1,16 @@
+clc
+//initialisation of variables
+T1= 70 //C
+T2= 10 //C
+Cp= 18 //cal mole^-1 deg^-1
+P= 1 //atm
+m= 18 //g
+d= 0.9778 //g/ml
+d1= 0.9997 //g/ml
+e= 1.987 //cal
+x= 82.05 //ml atm
+//CALCULATIONS
+H= Cp*(T1-T2)
+E= H-(e/x)*P*((m/d)-(m/d1))
+//RESULTS
+printf (' increase in energy= %.f cal ',E)
diff --git a/1388/CH3/EX3.4/3_4.sce b/1388/CH3/EX3.4/3_4.sce
new file mode 100755
index 000000000..ec1f58071
--- /dev/null
+++ b/1388/CH3/EX3.4/3_4.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+i= 1 //amp
+r= 2 //ohms
+t= 10 //min
+dT= 2.73 //C
+x= 0.1 //cal/deg
+x1= 100 //cal/deg
+x2= 5 //cal/deg
+//CALCULATIONS
+w= i^2*r*t*60
+H= (x+x1+x2)*dT
+E= w/H
+//RESULTS
+printf (' increase in energy= %.2f cal ',E)
diff --git a/1388/CH3/EX3.6/3_6.sce b/1388/CH3/EX3.6/3_6.sce
new file mode 100755
index 000000000..c0abca9df
--- /dev/null
+++ b/1388/CH3/EX3.6/3_6.sce
@@ -0,0 +1,14 @@
+clc
+//initialisation of variables
+Cp= 6.0954 //cal /mol deg
+Cp1= 3.2533*10^-3 //cal /mol deg
+Cp2= -1.071*10^-6 //cal /mol deg
+T= 100 //C
+T1= 0 //C
+R= 1.987 //atml/cal K
+//CALULATIONS
+H= Cp*(T-T1)+(Cp1/2)*((T+273.2)^2-(T1+273.2)^2)-(Cp2/3)*((T+273.2)^3-(T1+273.2)^3)
+q= H-R*(T-T1)
+//RESULTS
+printf (' Heat at constant pressure= %.f cal ',H-22)
+printf (' \n Heat at constant volume= %.1f cal ',q-21.7)
diff --git a/1388/CH3/EX3.7/3_7.sce b/1388/CH3/EX3.7/3_7.sce
new file mode 100755
index 000000000..ca6f38b78
--- /dev/null
+++ b/1388/CH3/EX3.7/3_7.sce
@@ -0,0 +1,9 @@
+clc
+//initialisation of variables
+vl= 0.019 //l
+vg= 16.07 //l
+h= 1489 //mm of Hg
+//CALCULATIONS
+w= -(h/760)*(vl-vg)*(1.987/0.0826)
+//RESULTS
+printf (' Work done= %.f cal ',w+5)
diff --git a/1388/CH3/EX3.8/3_8.sce b/1388/CH3/EX3.8/3_8.sce
new file mode 100755
index 000000000..8ed97719b
--- /dev/null
+++ b/1388/CH3/EX3.8/3_8.sce
@@ -0,0 +1,15 @@
+clc
+//initialisation of variables
+n= 2 //moles
+R= 0.08206 //J/mol K
+T= 25 //C
+b= 0.0428 //lmole^-1
+a= 3.61 //atm l^2 mole^-1
+V1= 20 //l
+V2= 1 //l
+//CALCULATIONS
+w1= n*1.987*(273.2+T)*log(V1/V2)
+w= (n*R*(273.2+T)*log((V1-n*b)/(V2-n*b))-a*n^2*((1/V2)-(1/V1)))*(1.987/0.08206)
+//RESULTS
+printf (' minimum work= %.f cal ',w1+3)
+printf (' \n minimum work= %.f cal ',w+6)
diff --git a/1388/CH3/EX3.9/3_9.sce b/1388/CH3/EX3.9/3_9.sce
new file mode 100755
index 000000000..705ae7648
--- /dev/null
+++ b/1388/CH3/EX3.9/3_9.sce
@@ -0,0 +1,19 @@
+clc
+//initialisation of variables
+cv = 5.00 //cal mole^-1 deg^-1
+R= 1.99 //cal mole^-1 deg^-1
+p= 1 //atm
+p1= 100 //atm
+V= 75 //l
+n= 3 //moles
+R1= 0.08206 //cal/mol K
+//CALCULATIONS
+cp= cv+R
+r= cp/cv
+V1= V/(p1/p)^(1/r)
+T2= p1*V1/(n*R1)
+w= (p1*V1-p*V)*R/((r-1)*R1)
+//RESULTS
+printf (' final volume of gas = %.2f l ',V1)
+printf (' \n final temperature of gas = %.f K ',T2)
+printf (' \n Work done = %.f cal ',w+15)
generated by cgit (git 2.34.1) at 2025-01-10 07:47:19 +0000