6 files changed, 121 insertions, 0 deletions
diff --git a/3763/CH5/EX5.1/Ex5_1.sce b/3763/CH5/EX5.1/Ex5_1.sce
new file mode 100644
index 000000000..68e8666c5
--- /dev/null
+++ b/3763/CH5/EX5.1/Ex5_1.sce
@@ -0,0 +1,28 @@
+clear
+//
+//
+//
+
+//Variable declaration
+Na=6.023*10**26    //avagadro number
+e=1.602*10**-19
+d=8960     //density
+N=1       //number of free electrons
+w=63.54    //atomic weight
+i=10      //current(ampere)
+m=9.1*10**-31    
+rho=2*10**-8   //resistivity(ohm m)
+r=0.08*10**-2    //radius(m)
+c=1.6*10**6   //mean thermal velocity(m/s)
+
+//Calculation
+A=%pi*r**2    //area(m**2)
+n=Na*d*N/w
+vd=i/(A*n*e)     //drift speed(m/s)
+tow_c=m/(n*e**2*rho)
+lamda=tow_c*c      //mean free path(m)
+
+//Result
+printf("\n drift speed is %0.1f  *10**-5 m/s",vd*10**5)
+printf("\n mean free path is %0.2f  *10**-8 m",lamda*10**8)
+printf("\n answer given in the book is wrong")
diff --git a/3763/CH5/EX5.2/Ex5_2.sce b/3763/CH5/EX5.2/Ex5_2.sce
new file mode 100644
index 000000000..056f7c4b0
--- /dev/null
+++ b/3763/CH5/EX5.2/Ex5_2.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+e=1.602*10**-19
+m=9.1*10**-31  //mass(kg)
+tow=2*10**-14    //time(s)
+n=8.5*10**28    
+
+//Calculation
+sigma=n*e**2*tow/m    //electrical conductivity(ohm-1 m-1)
+
+//Result
+printf("\n electrical conductivity is %0.1f  *10**7 ohm-1 m-1",sigma/10**7)
diff --git a/3763/CH5/EX5.3/Ex5_3.sce b/3763/CH5/EX5.3/Ex5_3.sce
new file mode 100644
index 000000000..a6c4b975d
--- /dev/null
+++ b/3763/CH5/EX5.3/Ex5_3.sce
@@ -0,0 +1,21 @@
+clear
+//
+//
+//
+
+//Variable declaration
+e=1.6*10**-19
+m=9.1*10**-31  //mass(kg)
+n=5.8*10**28  
+rho=1.54*10**-8    //resistivity(ohm m)
+E=1*10**2
+
+//Calculation
+tow=m/(rho*n*e**2)      //relaxation time(s)
+mew_e=1/(rho*e*n)       //mobility of electrons(m**2/Vs)
+vd=mew_e*E       //drift velocity(m/s)
+
+//Result
+printf("\n relaxation time is %0.0f  *10**-14 s",tow*10**14)
+printf("\n mobility of electrons is %0.0f  *10**-3 m**2/Vs",mew_e*10**3)
+printf("\n drift velocity is %0.1f  m/s",vd)
diff --git a/3763/CH5/EX5.4/Ex5_4.sce b/3763/CH5/EX5.4/Ex5_4.sce
new file mode 100644
index 000000000..3292f3eef
--- /dev/null
+++ b/3763/CH5/EX5.4/Ex5_4.sce
@@ -0,0 +1,16 @@
+clear
+//
+//
+//
+
+//Variable declaration
+rho=1.7*10**-8    //resistivity(ohm m)
+T=300     //temperature(K)
+T1=973    //temperature(K)
+
+//Calculation
+a=rho/T    
+rho_973=a*T1    //resistivity(ohm m)
+
+//Result
+printf("\n resistivity is %0.2f  *10**-8 ohm m",rho_973*10**8)
diff --git a/3763/CH5/EX5.5/Ex5_5.sce b/3763/CH5/EX5.5/Ex5_5.sce
new file mode 100644
index 000000000..1a67cab8b
--- /dev/null
+++ b/3763/CH5/EX5.5/Ex5_5.sce
@@ -0,0 +1,18 @@
+clear
+//
+//
+//
+
+//Variable declaration
+rho1=1.2*10**-8    //resistivity(ohm m)
+rho2=0.12*10**-8    //resistivity(ohm m)
+p1=0.4    //atomic percent
+p2=0.5    //atomic percent
+rho=1.5*10**-8    //resistivity(ohm m)
+
+//Calculation
+rho_i=(rho1*p1)+(rho2*p2)     //increase of resistivity(ohm m)
+Tr=rho+rho_i       //total resistivity of copper alloy(ohm m)
+
+//Result
+printf("\n increase of resistivity is %0.2f  *10**-8 ohm m",rho_i*10**8)
diff --git a/3763/CH5/EX5.6/Ex5_6.sce b/3763/CH5/EX5.6/Ex5_6.sce
new file mode 100644
index 000000000..77a69cae1
--- /dev/null
+++ b/3763/CH5/EX5.6/Ex5_6.sce
@@ -0,0 +1,22 @@
+clear
+//
+//
+//
+
+//Variable declaration
+e=1.6*10**-19
+m=9.1*10**-31  //mass(kg)
+n=6*10**28     //density(per m**3)
+tow=10**-14    //relaxation time(s)
+T=300    //temperature(K)
+k=1.38*10**-23   //boltzmann constant
+
+//Calculation
+sigma=n*e**2*tow/m    //electrical conductivity(ohm-1 m-1)
+K=n*%pi**2*k**2*T*tow/(3*m)    //thermal conductivity(W/m/K)
+L=K/(sigma*T)    //lorentz number(watt ohm K-2)
+
+//Result
+printf("\n electrical conductivity is %0.3f  *10**7 ohm-1 m-1",sigma/10**7)
+printf("\n thermal conductivity is %0.2f  W/m/K",K)
+printf("\n lorentz number is %0.3f  *10**-8 watt ohm K-2",L*10**8)