summaryrefslogtreecommitdiff
path: root/3840/CH2
diff options
context:
space:
mode:
Diffstat (limited to '3840/CH2')
-rw-r--r--3840/CH2/EX2.1/Ex2_1.sce16
-rw-r--r--3840/CH2/EX2.2/Ex2_2.sce16
-rw-r--r--3840/CH2/EX2.3/Ex2_3.sce16
-rw-r--r--3840/CH2/EX2.5/Ex2_5.sce14
-rw-r--r--3840/CH2/EX2.6/Ex2_6.sce15
5 files changed, 77 insertions, 0 deletions
diff --git a/3840/CH2/EX2.1/Ex2_1.sce b/3840/CH2/EX2.1/Ex2_1.sce
new file mode 100644
index 000000000..9f2bd3f4c
--- /dev/null
+++ b/3840/CH2/EX2.1/Ex2_1.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+r=0.1249 //radius(nm)
+n=2 //number of atoms
+
+//Calculation
+a=4*r/sqrt(3) //unit cell edge length(nm)
+V=a**3 //volume of unit cell(nm**3)
+v=4*n*%pi*r**3/3 //volume of atoms in unit cell(nm**3)
+fv=V-v //free volume per unit cell(nm**3)
+
+//Result
diff --git a/3840/CH2/EX2.2/Ex2_2.sce b/3840/CH2/EX2.2/Ex2_2.sce
new file mode 100644
index 000000000..fe0f81c13
--- /dev/null
+++ b/3840/CH2/EX2.2/Ex2_2.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+N=6.02*10**26 //Avagadro Number
+n=2
+rho=530 //density(kg/m**3)
+M=6.94 //atomic weight(amu)
+
+//Calculation
+a=(n*M/(rho*N))**(1/3)*10**10 //lattice constant(angstrom)
+
+//Result
+printf("\n lattice constant is %0.3f angstrom",a)
diff --git a/3840/CH2/EX2.3/Ex2_3.sce b/3840/CH2/EX2.3/Ex2_3.sce
new file mode 100644
index 000000000..0273e06ba
--- /dev/null
+++ b/3840/CH2/EX2.3/Ex2_3.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+N=6.02*10**23 //Avagadro Number
+n=2
+rho=7860 //density(kg/m**3)
+M=55.85 //atomic weight(amu)
+
+//Calculation
+a=(n*M/(rho*N))**(1/3)*10**9 //lattice constant(angstrom)
+
+//Result
+printf("\n lattice constant is %0.2f angstrom",a)
diff --git a/3840/CH2/EX2.5/Ex2_5.sce b/3840/CH2/EX2.5/Ex2_5.sce
new file mode 100644
index 000000000..f34831f62
--- /dev/null
+++ b/3840/CH2/EX2.5/Ex2_5.sce
@@ -0,0 +1,14 @@
+clear
+//
+//
+//
+
+//Variable declaration
+a=3.5 //lattice constant(angstrom)
+n=10**7 //1mm in angstrom
+
+//Calculation
+N=n**2/a**2 //number of atoms per sq mm
+
+//Result
+printf("\n number of atoms per sq mm is %0.2f *10**12",N/10**12)
diff --git a/3840/CH2/EX2.6/Ex2_6.sce b/3840/CH2/EX2.6/Ex2_6.sce
new file mode 100644
index 000000000..e97510d41
--- /dev/null
+++ b/3840/CH2/EX2.6/Ex2_6.sce
@@ -0,0 +1,15 @@
+clear
+//
+//
+//
+
+//Variable declaration
+N=6.02*10**26 //Avagadro Number
+n=8 //number of atoms
+a=5.62*10**-10 //lattice constant(m)
+M=72.59 //atomic weight(amu)
+
+//Calculation
+rho=n*M/(a**3*N) //density(kg/m**3)
+
+//Result