summaryrefslogtreecommitdiff
path: root/3718/CH7/EX7.8/Ex7_8.sce
blob: d3da25dc6fa82e2a1fc7c1519767dad9753d1c01 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//Chapter 7: Solid State
//Problem: 8
clc;

//Declaration of Constant
N = 6.023 * 10 ** 23

//Declaration of Variables
wt = 55.6
p = 0.29                // nm
n = 2

// Solution
mprintf( "For BCC pattern,\n Number of Atoms per unit cell = 2\n")
d = n * (wt * 10 ** -3) / (N * (p * 10 ** - 9) ** 3)
mprintf(" Density of the metal is  %.2e kg per m cube\n",d)
mprintf(" Number of nearest neighbours for BCC = 8")