summaryrefslogtreecommitdiff
path: root/3718/CH12
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3718/CH12
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3718/CH12')
-rw-r--r--3718/CH12/EX12.1/Ex12_1.sce11
-rw-r--r--3718/CH12/EX12.2/Ex12_2.sce11
-rw-r--r--3718/CH12/EX12.3/Ex12_3.sce13
-rw-r--r--3718/CH12/EX12.4/Ex12_4.sce16
4 files changed, 51 insertions, 0 deletions
diff --git a/3718/CH12/EX12.1/Ex12_1.sce b/3718/CH12/EX12.1/Ex12_1.sce
new file mode 100644
index 000000000..31fc2df6b
--- /dev/null
+++ b/3718/CH12/EX12.1/Ex12_1.sce
@@ -0,0 +1,11 @@
+//Chapter 12: Polymers and Polymerization
+//Problem: 1
+clc;
+
+//Declaration of Variable
+Mwt = 21150 // in g per mol
+
+// Solution
+m = 2 * 12 + 3 * 1.008 + 1 * 35.45 // g per mer
+n = Mwt / m
+mprintf("The degree of polymerization is %d",n)
diff --git a/3718/CH12/EX12.2/Ex12_2.sce b/3718/CH12/EX12.2/Ex12_2.sce
new file mode 100644
index 000000000..d71d40643
--- /dev/null
+++ b/3718/CH12/EX12.2/Ex12_2.sce
@@ -0,0 +1,11 @@
+//Chapter 12: Polymers and Polymerization
+//Problem: 2
+clc;
+
+//Declaration of Variables
+n = 10000 // degree of polymerisation
+
+// Solution
+m = 8 * 12 + 8 * 1.008 // g / mer
+M = n * m
+mprintf("Molecular weight of polystyrene chain = %.1f g /mol", M)
diff --git a/3718/CH12/EX12.3/Ex12_3.sce b/3718/CH12/EX12.3/Ex12_3.sce
new file mode 100644
index 000000000..8612017e7
--- /dev/null
+++ b/3718/CH12/EX12.3/Ex12_3.sce
@@ -0,0 +1,13 @@
+//Chapter 12: Polymers and Polymerization
+//Problem: 3
+clc;
+
+//Declaration of Variables
+d1 = 920 // density,in kg per m cube
+d2 = 961.97 // density,in kg per m cube
+dp = 44 // density %
+
+// Solution
+mprintf("dp = [d2 * (p - d1)] * [100/p * (d2 - d1)]\n")
+p = 937.98
+mprintf(" Density of sample is %.2f kg per m cube", p)
diff --git a/3718/CH12/EX12.4/Ex12_4.sce b/3718/CH12/EX12.4/Ex12_4.sce
new file mode 100644
index 000000000..1cce9e5a3
--- /dev/null
+++ b/3718/CH12/EX12.4/Ex12_4.sce
@@ -0,0 +1,16 @@
+//Chapter 12: Polymers and Polymerization
+//Problem: 4
+clc;
+
+//Declaration of Constant
+Na = 6.022 * 10 ** 23 // Avogadros number
+
+// Variables
+wt_ethylene = 28 // g
+deg = 500
+
+// Solution
+n = Na / deg
+
+mprintf("28 g of ethylene contains %.3e molecules\n",Na)
+mprintf(" No. of polyethylene formed %.3e molecules",n)