//Section-1,Example-6,Page no.-AC.36
//To find M_wbar for PP given its degree of polymerisation as 10,000.
clc;
DP_wbar= 10000                    //Degree of polymerisation(given)
M_o=(12*3)+(6*1)                 //Molecular weight of repeat unit of PP
M_wbar= (10000*42)
disp (M_wbar,'weight averge molecular mass(gm/mol)')