summaryrefslogtreecommitdiff
path: root/3428
diff options
context:
space:
mode:
Diffstat (limited to '3428')
-rw-r--r--3428/CH1/EX1.1/Ex1_1.sce14
-rw-r--r--3428/CH1/EX1.2/Ex1_2.sce13
-rw-r--r--3428/CH1/EX1.3/Ex1_3.sce15
-rw-r--r--3428/CH1/EX1.4/Ex1_4.sce7
-rw-r--r--3428/CH1/EX1.5/Ex1_5.sce7
-rw-r--r--3428/CH1/EX1.6/Ex1_6.sce7
-rw-r--r--3428/CH1/EX1.7/Ex1_7.sce19
-rw-r--r--3428/CH5/EX5.1/Ex5_1.sce9
-rw-r--r--3428/CH5/EX5.2/Ex5_2.sce7
-rw-r--r--3428/CH5/EX5.3/Ex5_3.sce7
-rw-r--r--3428/CH5/EX5.4/Ex5_4.sce9
-rw-r--r--3428/CH5/EX5.5/Ex5_5.sce10
-rw-r--r--3428/CH5/EX5.6/Ex5_6.sce10
13 files changed, 134 insertions, 0 deletions
diff --git a/3428/CH1/EX1.1/Ex1_1.sce b/3428/CH1/EX1.1/Ex1_1.sce
new file mode 100644
index 000000000..1e506a90c
--- /dev/null
+++ b/3428/CH1/EX1.1/Ex1_1.sce
@@ -0,0 +1,14 @@
+//Section-1,Example-1,Page no.-AC.33
+// To caculate number average molecular mass(Mn_bar) and weight average molecular mass(Mw_bar)
+clc;
+W_1=10
+W_2=90
+M_1=10000
+M_2=100000
+W=W1+W2 //weight of 2 constituents
+N_1=10/10000 //no.of moles of N1
+N_2=90/100000 //no.of moles of N2
+Mn_bar=(W_1+W_2)/(N_1+N_2)
+disp(Mn_bar,'number average molecular mass')
+Mw_bar=((N_1*M_1^2)+(N_2*M_2^2))/((N_1*M_1)+(N_2*M_2))
+disp(Mw_bar,'weight average molecular mass')
diff --git a/3428/CH1/EX1.2/Ex1_2.sce b/3428/CH1/EX1.2/Ex1_2.sce
new file mode 100644
index 000000000..b49461f92
--- /dev/null
+++ b/3428/CH1/EX1.2/Ex1_2.sce
@@ -0,0 +1,13 @@
+//Section-1,Example-2,Page no.-AC.34
+// To find number average molecular masses(Mn_bar) and weight averge molecular masses(Mw_bar)
+clc;
+WA=200
+WB=200
+WC=100
+MA_bar=1.2*10^5
+MB_bar=5.6*10^5
+MC_bar=10*10^5
+Mn_bar_mixture=(WA+WB+WC)/(WA/MA_bar+WB/MB_bar+WC/MC_bar)
+disp (Mn_bar_mixture,'number average molecular mass')
+Mw_bar_mixture=((4.5*10^5*200)+(8.9*10^5*200)+(10*10^5*100))/(200+200+100)
+disp (Mw_bar_mixture,'weight averge molecular mass')
diff --git a/3428/CH1/EX1.3/Ex1_3.sce b/3428/CH1/EX1.3/Ex1_3.sce
new file mode 100644
index 000000000..2712452c5
--- /dev/null
+++ b/3428/CH1/EX1.3/Ex1_3.sce
@@ -0,0 +1,15 @@
+//Section-1,Example-3,Page no.-AC.35
+// To find the number average molecular mass(M_nbar),weight averge molecular mass(M_wbar) and PDI
+clc;
+N1=100
+N2=200
+N3=300
+M1=100
+M2=1000
+M3=10000
+M_nbar=(N1*M1+N2*M2+N3*M3)/(N1+N2+N3)
+disp(M_nbar,'number average molecular mass.')
+M_wbar=(N1*M1^2+N2*M2^2+N3*M3^2)/(N1*M1+N2*M2+N3*M3)
+disp(M_wbar,'weight average molecular mass.')
+PDI=M_wbar/M_nbar
+disp(PDI,'Polydispersity index.')
diff --git a/3428/CH1/EX1.4/Ex1_4.sce b/3428/CH1/EX1.4/Ex1_4.sce
new file mode 100644
index 000000000..ae430eaa7
--- /dev/null
+++ b/3428/CH1/EX1.4/Ex1_4.sce
@@ -0,0 +1,7 @@
+//Section-1,Example-4,Page no.-AC.35
+// To calculate the number of molecules of PP produced.
+clc;
+n=42*((6.023*10^23)/42) //average degree of polymerisation(DP bar)
+N= n/1000
+disp(N,'number of PP molecules formed')
+
diff --git a/3428/CH1/EX1.5/Ex1_5.sce b/3428/CH1/EX1.5/Ex1_5.sce
new file mode 100644
index 000000000..6bacba006
--- /dev/null
+++ b/3428/CH1/EX1.5/Ex1_5.sce
@@ -0,0 +1,7 @@
+//Section-1,Example-5,Page no.-AC.35
+//To calculate the number average degree of polymerisation(DP_n bar)of polystrene.
+clc;
+M_nbar= 10^5 //(g/mol)
+M_o = (12*8)+(1*8)
+DP_nbar=(M_nbar/M_o)
+disp(DP_nbar,'Number average degree of polymerisation of polystrene')
diff --git a/3428/CH1/EX1.6/Ex1_6.sce b/3428/CH1/EX1.6/Ex1_6.sce
new file mode 100644
index 000000000..f4f55a049
--- /dev/null
+++ b/3428/CH1/EX1.6/Ex1_6.sce
@@ -0,0 +1,7 @@
+//Section-1,Example-6,Page no.-AC.36
+//To find M_wbar for PP given its degree of polymerisation as 10,000.
+clc;
+DP_wbar= 10000 //Degree of polymerisation(given)
+M_o=(12*3)+(6*1) //Molecular weight of repeat unit of PP
+M_wbar= (10000*42)
+disp (M_wbar,'weight averge molecular mass(gm/mol)')
diff --git a/3428/CH1/EX1.7/Ex1_7.sce b/3428/CH1/EX1.7/Ex1_7.sce
new file mode 100644
index 000000000..f481e0474
--- /dev/null
+++ b/3428/CH1/EX1.7/Ex1_7.sce
@@ -0,0 +1,19 @@
+//Section-1,Example-7,Page no.-AC.36
+//To calculate number average(Mn_bar) and weight average molecular mass(Mw_bar)of polypropylene polymer
+clc;
+M1=[(12*3)+(6*1)]*400 //molecular mass of (a)
+M2=[(12*3)+(6*1)]*800 //molecular mass of (b)
+M3=[(12*3)+(6*1)]*600 //molecular mass of (c)
+n1=25
+n2=35
+n3=40
+Mn_bar=((n1*M1)+(n2*M2)+(n3*M3))/(n1+n2+n3)
+disp(Mn_bar,'number average molecular mass')
+Mw_bar=((n1*M1^2)+(n2*M2^2)+(n3*M3^2))/((n1*M1)+(n2*M2)+(n3*M3))
+disp(Mw_bar,'weight average molecular mass')
+
+
+
+
+
+
diff --git a/3428/CH5/EX5.1/Ex5_1.sce b/3428/CH5/EX5.1/Ex5_1.sce
new file mode 100644
index 000000000..5d3f1cd81
--- /dev/null
+++ b/3428/CH5/EX5.1/Ex5_1.sce
@@ -0,0 +1,9 @@
+//Section-1,Example-1,Page no.-AC.162
+//To calculate the weight and volume of air required for the combustion of 1 kg of carbon.
+clc;
+W_O=(32/12)*1 //Weight of O_2 reqd. by 1 kg Carbon(kg)
+W_Air=(100/23)*W_O
+disp(W_Air,'weight of air required(kg)')
+W_Oxy=(22.4/32)*W_O*1000 //Volume occupied by 2.667kg O_2
+V=((100/21)*W_Oxy)/1000
+disp(V,'Volume of air required(m^3)')
diff --git a/3428/CH5/EX5.2/Ex5_2.sce b/3428/CH5/EX5.2/Ex5_2.sce
new file mode 100644
index 000000000..5f0087b0d
--- /dev/null
+++ b/3428/CH5/EX5.2/Ex5_2.sce
@@ -0,0 +1,7 @@
+//Section-1,Example-2,Page no.-AC.163
+//To find the weight of air actually supplied per m^3 of the gas.
+clc;
+M_w=28.97
+V=300*(100/21)*(150/100) //Volume of air reqd. for 1m^3 of gas using 50% excess air(L)
+W=V*(1/22.4)*M_w
+disp(W,'weight of air actually supplied per m^3 of the gas.(gm)')
diff --git a/3428/CH5/EX5.3/Ex5_3.sce b/3428/CH5/EX5.3/Ex5_3.sce
new file mode 100644
index 000000000..c29faa47b
--- /dev/null
+++ b/3428/CH5/EX5.3/Ex5_3.sce
@@ -0,0 +1,7 @@
+//Section-1,Example-3,Page no.-AC.163
+//To find the weight of air actually supplied per m^3 of the gas.
+clc;
+M_w=28.94
+V=300*(100/21)*(150/100) //Volume of air reqd. for 1m^3 of gas using 50% excess air(L)
+W=V*(1/22.4)*M_w
+disp(W,'weight of air actually supplied per m^3 of the gas.(gm)')
diff --git a/3428/CH5/EX5.4/Ex5_4.sce b/3428/CH5/EX5.4/Ex5_4.sce
new file mode 100644
index 000000000..031408abc
--- /dev/null
+++ b/3428/CH5/EX5.4/Ex5_4.sce
@@ -0,0 +1,9 @@
+//Section-1,Example-4,Page no.-AC.164
+//To calculate the mass of air needed for complete combustion of 1 kg fuel.
+clc;
+W_C=4000 //(gm)
+W_H=750 //(gm)
+W_O=250 //(gm)
+WO_net=(((32/12)*W_C)+((16/2)*W_H))-W_O //Net O_2(gm)
+M=WO_net*(100/23)*10^-3
+disp(M,'mass of air needed for complete combustion(kg)')
diff --git a/3428/CH5/EX5.5/Ex5_5.sce b/3428/CH5/EX5.5/Ex5_5.sce
new file mode 100644
index 000000000..aea4495f8
--- /dev/null
+++ b/3428/CH5/EX5.5/Ex5_5.sce
@@ -0,0 +1,10 @@
+//Section-1,Example-5,Page no.-AC.164
+//To calculate the quantity of air needed for complete combustion of 1 kg fuel.
+clc;
+W_C=800 //(gm)
+W_H=40 //(gm)
+W_S=20 //(gm)
+W_O=30 //(gm)
+WO_net=(((32/12)*W_C)+((16/2)*W_H)+((32/32)*W_S))-W_O //Net O_2 //(gm)
+M=WO_net*(100/23)*(160/100)*10^-3
+disp(M,'mass of air needed for complete combustion(kg)')
diff --git a/3428/CH5/EX5.6/Ex5_6.sce b/3428/CH5/EX5.6/Ex5_6.sce
new file mode 100644
index 000000000..52f622dfc
--- /dev/null
+++ b/3428/CH5/EX5.6/Ex5_6.sce
@@ -0,0 +1,10 @@
+//Section-1,Example-6,Page no.-AC.164
+//To calculate the quantity of air needed for complete combustion of 1 kg fuel..
+clc;
+W_C=720 //(gm)
+W_H=50 //(gm)
+W_S=30 //(gm)
+W_O=40 //(gm)
+WO_net=(((32/12)*W_C)+((16/2)*W_H)+((32/32)*W_S))-W_O //(gm)
+M=WO_net*(100/23)*10^-3
+disp(M,'mass of air needed for complete combustion(kg)')
generated by cgit (git 2.34.1) at 2024-12-19 13:00:25 +0000