diff options
Diffstat (limited to '3840/CH2')
-rw-r--r-- | 3840/CH2/EX2.1/Ex2_1.sce | 16 | ||||
-rw-r--r-- | 3840/CH2/EX2.2/Ex2_2.sce | 16 | ||||
-rw-r--r-- | 3840/CH2/EX2.3/Ex2_3.sce | 16 | ||||
-rw-r--r-- | 3840/CH2/EX2.5/Ex2_5.sce | 14 | ||||
-rw-r--r-- | 3840/CH2/EX2.6/Ex2_6.sce | 15 |
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 |