summaryrefslogtreecommitdiff
path: root/1694/CH1/EX1.18/EX1_18.sce
blob: 246c80dc50c0e597a2ca8942314faab97e7655b0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clear;
clc;
printf("\nEx1.18\n");
//page no.-32
//given
n=2;...........//no. of atoms per unit cell
M=55.85;........//atomic wt. of Ge
N=6.02*10^26;....//avagadro no.
rho=7860;........//density in Kg/m^3

a=((n*M)/(rho*N))^(1/3)........//lattice constant in angstrom

printf("\nlattice constant is 0.286 angstrom\n");