diff options
Diffstat (limited to '1586/CH15/EX15.2/EXP15_2.sce')
| -rw-r--r-- | 1586/CH15/EX15.2/EXP15_2.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/1586/CH15/EX15.2/EXP15_2.sce b/1586/CH15/EX15.2/EXP15_2.sce new file mode 100644 index 000000000..f8d97a0e5 --- /dev/null +++ b/1586/CH15/EX15.2/EXP15_2.sce @@ -0,0 +1,11 @@ +clc;funcprot(0);//EXAMPLE 15.2
+// Initialisation of Variables
+R=2.5;..........//Ratio of O to Si in SiO2
+W1=69.62;........//Weight of B2O3 in g/ml
+W2=60.08;........//Weight of SiO2 in g/ml
+//CALCULATIONS
+Fb1=(R-2)/3.5;...........//Mole Fraction of B2O3
+Fb2=1-Fb1;.........//Mole fraction of SiO2
+Wp=((Fb1*W1)/((Fb1*W1)+(Fb2*W2)))*100;.......//Weight Percent of B2O3
+disp(Fb1,"Mole Fraction of B2O3:")
+disp(Wp,"Weight Percent of B2O3:")
|