summaryrefslogtreecommitdiff
path: root/3557/CH3/EX3.4/Ex3_4.sce
blob: 2b6a439df1a1a55338b02b6e2f3c85aad3b719bb (plain)
1
2
3
4
5
6
7
8
9
//Example 3.4//
a=24.31;//gram //atomic mass of magnesium
b=16.00;//gram // atomic mass of oxygen
c=0.6023*10^24;//Avogardo's number
v=0.0741;//nm^3 //unit cell volume
d=10^7;//nm/cm
e=4;//Number of electrons
p=((((e*a)+(e*b))/(c))/(v))*d^3
mprintf("p = %f g/cm^3",p)