summaryrefslogtreecommitdiff
path: root/3755/CH2/EX2.28/Ex2_28.sce
blob: 796fa807d7e6ea587065a92d9190cbeab6e50bb0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clear
//
//
//

//Variable declaration
rho=5.96;       //density(gm/cc)
M=50;         //molecular weight
N=6.023*10^23;      //avagadro number
n=2;     //number of atoms

//Calculations
a=(n*M/(rho*N))^(1/3);      //lattice constant(cm)
r=a*sqrt(3)/4;          //radius of atom(angstrom)
pf=n*(4/3)*%pi*r^3/a^3;      //packing factor

//Result
printf("\n packing factor is %0.2f ",pf)