4 files changed, 55 insertions, 0 deletions
diff --git a/1538/CH12/EX12.1/Ex12_1.sce b/1538/CH12/EX12.1/Ex12_1.sce
new file mode 100755
index 000000000..68e51fd85
--- /dev/null
+++ b/1538/CH12/EX12.1/Ex12_1.sce
@@ -0,0 +1,11 @@
+//example-12.1
+//page no-382
+//given
+//degree of polymerization of styrene
+DOP=10000
+//formula of styrene= C8H8
+//molecular weight of styrene monomer
+Mm=12*8+1*8
+//molecular weight of polymer
+Mp=DOP*Mm
+printf ("the molecular weight of styrene polymer is %d",Mp)
diff --git a/1538/CH12/EX12.2/Ex12_2.sce b/1538/CH12/EX12.2/Ex12_2.sce
new file mode 100755
index 000000000..4ada9a5cd
--- /dev/null
+++ b/1538/CH12/EX12.2/Ex12_2.sce
@@ -0,0 +1,18 @@
+//example-12.2
+//page no-382
+//given
+//degree of polymerization of teflon
+DOP=100000
+//chemical formula of teflon is C2F4
+//molecular weight of monomer teflon
+Mm=2*12+4*19
+//molecular weight of teflon polymer
+Mp=DOP*Mm
+//molecular weight of polythene monomer i.ee C2H4
+MmP=2*12+4*1
+//molecular weight of polythene polymer
+MpP=DOP*MmP
+printf ("molecular weight of PTFE anf Polythene are %d and %d",Mm,MpP)
+//ratio of molecular weight of PTFE and Polythene
+R=Mp/MpP
+printf ("the ration of molecular weight of PTFE and Polythene having same DOP is %f",R)
diff --git a/1538/CH12/EX12.3/Ex12_3.sce b/1538/CH12/EX12.3/Ex12_3.sce
new file mode 100755
index 000000000..f42a27c84
--- /dev/null
+++ b/1538/CH12/EX12.3/Ex12_3.sce
@@ -0,0 +1,10 @@
+//example-12.3
+//page no-396
+//given
+//the molecular weight of polyisoprene monomer
+Mm=68  //gm
+//after vulcanisation with sulphur, it is observedthat the 2 molecules of isoprene monimer require 2 molecules of sulphur
+//hence for full cross linking ,(68*2) gm of isoprene requires (32*2)gm of sulphur. therefore 68kg of isoprene requires
+M=32*2*68/68/2  //kg of sulphur
+printf ("the weight of sulphur required for cross link polymerization of polyisoprene is %d of sulphur",M)
+printf ("the fully cross linked product will be EBONITE")
diff --git a/1538/CH12/EX12.4/Ex12_4.sce b/1538/CH12/EX12.4/Ex12_4.sce
new file mode 100755
index 000000000..d1089b0e4
--- /dev/null
+++ b/1538/CH12/EX12.4/Ex12_4.sce
@@ -0,0 +1,16 @@
+//example-12.4
+//page no-396
+//given
+//molecular weight of butdiene,isoprene,sulhur and carbon black are
+MB=4*12+6*1
+MI=68
+MS=32
+MC=12
+//percentages of diiferent constituents in rubber
+PB=27/MB
+PI=51/MI
+PS=16/MS
+PC=6/MC
+//percentage of coss linking
+percent=PS/(PI+PB)*100
+printf ("the percentage of cross linking is %d",percent)