diff options
Diffstat (limited to '3718/CH12/EX12.3/Ex12_3.sce')
| -rw-r--r-- | 3718/CH12/EX12.3/Ex12_3.sce | 13 |
1 files changed, 13 insertions, 0 deletions
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)
|