summaryrefslogtreecommitdiff
path: root/3020/CH13/EX13.19/ex13_19.sce
diff options
context:
space:
mode:
Diffstat (limited to '3020/CH13/EX13.19/ex13_19.sce')
-rwxr-xr-x3020/CH13/EX13.19/ex13_19.sce10
1 files changed, 10 insertions, 0 deletions
diff --git a/3020/CH13/EX13.19/ex13_19.sce b/3020/CH13/EX13.19/ex13_19.sce
new file mode 100755
index 000000000..14dab4848
--- /dev/null
+++ b/3020/CH13/EX13.19/ex13_19.sce
@@ -0,0 +1,10 @@
+clc;
+clear all;
+at = 63.5e-3; // Atomic weight of copper in Kg
+N = 6.022e26; // Avagadro constant
+r = 1.273e-10; // Atomic radius for FCC in meters
+n = 4;// Number of atoms per unit cell in FCC
+a = (4*r)/sqrt(2); // Lattice parameter for FCC
+rho = (n*at)/(N*a^3); //Density of material
+disp('gm/m^3',rho,'The density of copper is')
+// Slight variation in answer than textbook