summaryrefslogtreecommitdiff
path: root/3669/CH2/EX2.2/2.sce
blob: fa0ab8828aa67aa9c51a1c3e20097c9948d71ef1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Variable declaration
n=2;     //number of atoms
M=6.94;   //atomic weight(kg)
rho=530;   //density(kg/m**3)
Na=6.02*10**26;    //avagadro number

//Calculation
a3=n*M/(rho*Na);
a=a3**(1/3);     //lattice constant(m)

//Result
printf('lattice constant is %0.3f   angstrom  \n',(a*10**10))