summaryrefslogtreecommitdiff
path: root/3718/CH12/EX12.3/Ex12_3.sce
blob: 8612017e796987a796605f6c3d240cd5a4dcdfd2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
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)