summaryrefslogtreecommitdiff
path: root/3557/CH12/EX12.1/Ex12_1.sce
blob: 0888cbdba37786328844838c5ea01e65fc04a728 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Example12.1//

a=26.98;//amu //atomic mass of Aluminium
b=16.00;//amu //atomic mass of Oxygen
c=2;//Number of atoms
d=3;//Number of atoms
Al2O3=(c*a)+(d*b)
mprintf("Al2O3 = %f amu",Al2O3)
e=28.09;//amu //atomic mass of silicon
SiO2=e+(c*b)
mprintf("\nSiO2 = %f amu",SiO2)
f=(d*Al2O3)/((d*Al2O3)+(c*SiO2))
mprintf("\nf = %f",f)