summaryrefslogtreecommitdiff
path: root/1367/CH17/EX17.1/17_1.sce
blob: b80f67f03167bfa289171bca519d6708761f4ba1 (plain)
1
2
3
4
5
6
7
8
9
10
11
//Calculate molecular weight
//Ex:17.1
clc;
clear;
close;
mc=12;//mol wt of carbon
mh=1;;//mol wt of hydrogen
m=8*(mc+mh);//mol wt of C8H8
DOP=10000;//degree of polarization , given
mp=DOP*m;
disp(mp,"Molecualr weight of Styrene polymer = ");