summaryrefslogtreecommitdiff
path: root/3557/CH15/EX15.3/Ex15_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3557/CH15/EX15.3/Ex15_3.sce')
-rw-r--r--3557/CH15/EX15.3/Ex15_3.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/3557/CH15/EX15.3/Ex15_3.sce b/3557/CH15/EX15.3/Ex15_3.sce
new file mode 100644
index 000000000..5599950f2
--- /dev/null
+++ b/3557/CH15/EX15.3/Ex15_3.sce
@@ -0,0 +1,12 @@
+//Example 15.3//
+
+pcu=8.93;// g cm^-3 //Density of Copper
+a=63.55;//amu //atomic mass of copper
+c=10^6;//cm^3/m^3 //given
+d=1;//g.atom //given
+h=0.6023*10^24;//atoms/g.atom //Avogardo's Number
+p=pcu*c*(d/a)*(h)
+mprintf("p = %e atoms/m^3",p)
+a1=104*10^27;//m^-3 //density of free electrons in copper at room temperature
+e=a1/p
+mprintf("\ne = %f",e)