summaryrefslogtreecommitdiff
path: root/3828/CH10/EX10.5/Ex10_5.sce
diff options
context:
space:
mode:
Diffstat (limited to '3828/CH10/EX10.5/Ex10_5.sce')
-rw-r--r--3828/CH10/EX10.5/Ex10_5.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/3828/CH10/EX10.5/Ex10_5.sce b/3828/CH10/EX10.5/Ex10_5.sce
new file mode 100644
index 000000000..fcddaa5fa
--- /dev/null
+++ b/3828/CH10/EX10.5/Ex10_5.sce
@@ -0,0 +1,14 @@
+//Chapter 10 : Crystallography and Crystal Imperfections
+
+clear;
+
+//Variable declaration
+r=1.278 //atomic weigth
+No=6.02*10**26 //Avagadro's No.
+
+//Calculations
+a=2*sqrt(2)*r
+
+//Result
+mprintf("Lattice constant a= %.3f Armstrong",a)
+