21 files changed, 275 insertions, 0 deletions
diff --git a/3769/CH24/EX24.1/Ex24_1.sce b/3769/CH24/EX24.1/Ex24_1.sce
new file mode 100644
index 000000000..3e3d95f7b
--- /dev/null
+++ b/3769/CH24/EX24.1/Ex24_1.sce
@@ -0,0 +1,12 @@
+clear
+//Given
+k=7.68*10**6*1.6*10**-19                   //J
+e=1.6*10**-19
+Z=29
+m=9*10**9
+
+//Calculation
+r=(m*2*Z*e**2)/k
+
+//Result
+printf("\n The distance of the closest approach is %0.1f *10**-14 m",r*10**14)
diff --git a/3769/CH24/EX24.10/Ex24_10.sce b/3769/CH24/EX24.10/Ex24_10.sce
new file mode 100644
index 000000000..d23b7de79
--- /dev/null
+++ b/3769/CH24/EX24.10/Ex24_10.sce
@@ -0,0 +1,9 @@
+clear
+//Given
+Rh=1.097*10**7
+
+//Calculation
+l=9/(8.0*Rh)
+
+//Result
+printf("\n Wavelength of second line is %0.0f  A",l*10**10)
diff --git a/3769/CH24/EX24.11/Ex24_11.sce b/3769/CH24/EX24.11/Ex24_11.sce
new file mode 100644
index 000000000..71a55fef2
--- /dev/null
+++ b/3769/CH24/EX24.11/Ex24_11.sce
@@ -0,0 +1,9 @@
+clear
+//Given
+Rh=1.097*10**7
+
+//Calculation
+l=4/Rh
+
+//Result
+printf("\n Shortest wavelength is %0.0f  A",l*10**10)
diff --git a/3769/CH24/EX24.12/Ex24_12.sce b/3769/CH24/EX24.12/Ex24_12.sce
new file mode 100644
index 000000000..7f26b6e93
--- /dev/null
+++ b/3769/CH24/EX24.12/Ex24_12.sce
@@ -0,0 +1,9 @@
+clear
+//Given
+Rh=1.097*10**7
+
+//Calculation
+l=4/(3.0*Rh)
+
+//Result
+printf("\n Longest wavelength is %0.0f  A",l*10**10)
diff --git a/3769/CH24/EX24.13/Ex24_13.sce b/3769/CH24/EX24.13/Ex24_13.sce
new file mode 100644
index 000000000..d4677fbee
--- /dev/null
+++ b/3769/CH24/EX24.13/Ex24_13.sce
@@ -0,0 +1,14 @@
+clear
+//Given
+n=1.0
+h=6.62*10**-34
+c=3*10**8
+f=1.6*10**-19
+Z=2
+
+//Calculation
+E1=(-13.6*Z**2)/n**2
+l=-(h*c)/(E1*f)
+
+//Result
+printf("\n Minimum wavelength is %0.0f  A",l*10**10)
diff --git a/3769/CH24/EX24.15/Ex24_15.sce b/3769/CH24/EX24.15/Ex24_15.sce
new file mode 100644
index 000000000..783c73426
--- /dev/null
+++ b/3769/CH24/EX24.15/Ex24_15.sce
@@ -0,0 +1,15 @@
+clear
+//Given
+Z=2
+e=1.6*10**-19
+e1=8.854*10**-12
+n=3
+h=6.62*10**-34
+c=3*10**8
+
+//Calculation
+v=(Z*e**2)/(2*e1*n*h)
+a=v/c
+
+//Result
+printf("\n Speed of the electron is %0.3f  ",a)
diff --git a/3769/CH24/EX24.16/Ex24_16.sce b/3769/CH24/EX24.16/Ex24_16.sce
new file mode 100644
index 000000000..e7517bdac
--- /dev/null
+++ b/3769/CH24/EX24.16/Ex24_16.sce
@@ -0,0 +1,12 @@
+clear
+//Given
+r=10**-10
+R=10**-15
+Rs=7*10**8
+
+//Calculation
+R1=r/R
+Re=R1*Rs
+
+//Result
+printf("\n Radius of the earths orbit is %0.3f  m. Thus the earth would be much farther away from the sun",Re)
diff --git a/3769/CH24/EX24.17/Ex24_17.sce b/3769/CH24/EX24.17/Ex24_17.sce
new file mode 100644
index 000000000..093761a09
--- /dev/null
+++ b/3769/CH24/EX24.17/Ex24_17.sce
@@ -0,0 +1,15 @@
+clear
+//Given
+E=-13.6*1.9*10**-19                //J
+m=9*10**9
+e=1.6*10**-19
+n=1
+c=3*10**8
+
+//Calculation
+r=(-e**2*m)/(2.0*E)
+v=c/(137*n)
+
+//Result
+printf("\n Orbital radius is %0.1f *10**-11 m",r*10**11)
+printf("\n Velocity of the electron is %0.1f  *10**6 m/s",v*10**-6)
diff --git a/3769/CH24/EX24.18/Ex24_18.sce b/3769/CH24/EX24.18/Ex24_18.sce
new file mode 100644
index 000000000..0e87045b6
--- /dev/null
+++ b/3769/CH24/EX24.18/Ex24_18.sce
@@ -0,0 +1,11 @@
+clear
+//Given
+v=2.2*10**6
+r=5.3*10**-11
+
+//Calculation
+//
+f=v/(2*%pi*r)
+
+//Result
+printf("\n Initial frequency of light is %0.1f *10**15 Hz",f*10**-15)
diff --git a/3769/CH24/EX24.19/Ex24_19.sce b/3769/CH24/EX24.19/Ex24_19.sce
new file mode 100644
index 000000000..14c4de23e
--- /dev/null
+++ b/3769/CH24/EX24.19/Ex24_19.sce
@@ -0,0 +1,14 @@
+clear
+//Given
+m=10                 //Kg
+T=2*60*60             //S
+rn=8*10**6            //m
+h=6.62*10**-34
+
+//Calculation
+//
+vn=(2*%pi*rn)/T
+n=(2*%pi*rn*vn)/h
+
+//Result
+printf("\n Quantum number is %0.1f *10**45 ",n*10**-44)
diff --git a/3769/CH24/EX24.2/Ex24_2.sce b/3769/CH24/EX24.2/Ex24_2.sce
new file mode 100644
index 000000000..a4e0884b9
--- /dev/null
+++ b/3769/CH24/EX24.2/Ex24_2.sce
@@ -0,0 +1,14 @@
+clear
+//Given
+a=10                        //degree
+e=1.6*10**-19
+Z=79
+m=9*10**9
+a=5.0*1.6*10**-13
+
+//Calculation
+//
+b=(Z*e**2*(1/(tan(5*3.14/180.0)))*m)/a
+
+//Result
+printf("\n Impact parameter is %0.1f *10**-13 m",b*10**13)
diff --git a/3769/CH24/EX24.20/Ex24_20.sce b/3769/CH24/EX24.20/Ex24_20.sce
new file mode 100644
index 000000000..91f714c18
--- /dev/null
+++ b/3769/CH24/EX24.20/Ex24_20.sce
@@ -0,0 +1,13 @@
+clear
+//Given
+E2=18.70
+E1=16.70
+h=6.62*10**-34
+c=3*10**8
+
+//Calculation
+E=E2-E1
+l=(h*c)/(E*1.6*10**-19)
+
+//Result
+printf("\n Wavelength is %0.0f  nm",l*10**9)
diff --git a/3769/CH24/EX24.21/Ex24_21.sce b/3769/CH24/EX24.21/Ex24_21.sce
new file mode 100644
index 000000000..93353fa41
--- /dev/null
+++ b/3769/CH24/EX24.21/Ex24_21.sce
@@ -0,0 +1,13 @@
+clear
+//Given
+n1=2
+n2=3
+lb=6563
+a=20
+b=108.0
+
+//Calculation
+l1=(lb*a)/b
+
+//Result
+printf("\n Wavelength of first member is %0.0f  A",l1)
diff --git a/3769/CH24/EX24.22/Ex24_22.sce b/3769/CH24/EX24.22/Ex24_22.sce
new file mode 100644
index 000000000..0d769336e
--- /dev/null
+++ b/3769/CH24/EX24.22/Ex24_22.sce
@@ -0,0 +1,13 @@
+clear
+//Given
+Rh=1.097*10**7                         ///m
+h=6.63*10**-34
+c=3*10**8
+n=2.0
+n1=4.0
+
+//Calculation
+E=(h*c*Rh*(1/n**2-1/n1**2))/1.6*10**-19
+
+//Result
+printf("\n Minimum energy is %0.2f  ev",E*10**38)
diff --git a/3769/CH24/EX24.23/Ex24_23.sce b/3769/CH24/EX24.23/Ex24_23.sce
new file mode 100644
index 000000000..0d1463b6b
--- /dev/null
+++ b/3769/CH24/EX24.23/Ex24_23.sce
@@ -0,0 +1,12 @@
+clear
+//Given
+Rh=1.097*10**7
+n2=4.0
+n1=3.0
+
+//Calculation
+lm=1/(Rh*(1/n1**2-1/n2**2))
+lm1=9/Rh
+
+//Result
+printf("\n Wavelength is %0.1f  nm. This wavelength is in infrared part",lm1*10**9)
diff --git a/3769/CH24/EX24.3/Ex24_3.sce b/3769/CH24/EX24.3/Ex24_3.sce
new file mode 100644
index 000000000..45f2ea9cc
--- /dev/null
+++ b/3769/CH24/EX24.3/Ex24_3.sce
@@ -0,0 +1,12 @@
+clear
+//Given
+Z=79
+m=9*10**9
+e=1.6*10**-19
+r=4.0*10**-14
+
+//Calculation
+K=(m*2*Z*e**2)/(r*1.6*10**-13)
+
+//Result
+printf("\n Energy is %0.2f  Mev",K)
diff --git a/3769/CH24/EX24.4/Ex24_4.sce b/3769/CH24/EX24.4/Ex24_4.sce
new file mode 100644
index 000000000..f37366a25
--- /dev/null
+++ b/3769/CH24/EX24.4/Ex24_4.sce
@@ -0,0 +1,13 @@
+clear
+//Given
+v=2.1*10**7                        //m/s
+a=4.8*10**7                        //C/Kg
+Z=79
+e=1.6*10**-19
+m=9*10**9
+
+//Calculation
+r0=(2*m*Z*e*a)/v**2
+
+//Result
+printf("\n Distance of the closest approach is %0.1f *10**-14 m",r0*10**14)
diff --git a/3769/CH24/EX24.6/Ex24_6.sce b/3769/CH24/EX24.6/Ex24_6.sce
new file mode 100644
index 000000000..6150746ab
--- /dev/null
+++ b/3769/CH24/EX24.6/Ex24_6.sce
@@ -0,0 +1,16 @@
+clear
+//Given
+Z=79
+e=1.6*10**-19                 //C
+v=1.6*10**-12
+m=9*10**9
+
+//Calculation
+//
+b=(m*Z*e**2*(1/(tan(45*3.14/180.0))))/v
+
+//Result
+printf("\n (a) Scattering angle is 180 degree")
+printf("\n (b) The value of scattering angle decreases")
+printf("\n (c) Impact parameter is %0.1f *10**-14 m",b*10**14)
+printf("\n (e) Scattering angle is increase with decrease in impact parameter")
diff --git a/3769/CH24/EX24.7/Ex24_7.sce b/3769/CH24/EX24.7/Ex24_7.sce
new file mode 100644
index 000000000..01275e1c7
--- /dev/null
+++ b/3769/CH24/EX24.7/Ex24_7.sce
@@ -0,0 +1,17 @@
+clear
+//Given
+e=8.854*10**-12
+h=6.62*10**-34
+m=9*10**-31
+e1=1.6*10**-19
+
+//Calculation
+//
+r1=((e*h**2)/(%pi*m*e1**2))*10**10
+v1=e1**2/(2*e*h)
+n=2*r1
+
+//Result
+printf("\n Radius of first orbit is %0.2f  A",r1)
+printf("\n Velocity of electron is %0.1f  *10**6 m/s",v1*10**-6)
+printf("\n Size of hydrogen atom is %0.2f  A",n)
diff --git a/3769/CH24/EX24.8/Ex24_8.sce b/3769/CH24/EX24.8/Ex24_8.sce
new file mode 100644
index 000000000..560762879
--- /dev/null
+++ b/3769/CH24/EX24.8/Ex24_8.sce
@@ -0,0 +1,21 @@
+clear
+//Given
+n=1.0
+n1=2.0
+n2=3.0
+a=0.53*10**-10
+Z=3.0
+
+//Calculation
+r1=(a*n)/Z
+r2=(a*n1**2)/Z
+r3=(a*n2**2)/Z
+E1=(-13.6*Z**2)/n**2
+E2=(-13.6*Z**2)/n1**2
+E3=(-13.6*Z**2)/n2**2
+E=E3-E1
+
+//Result
+printf("\n (i) Radii of three lowest allowed orbits is %0.2f A %0.2f A and %0.3f A",r1*10**10,r2*10**10,r3*10**10)
+printf("\n (ii) Energy of three lowest allowed orbits is %0.3f ev %0.3f ev and %0.3f ev",E1,E2,E3)
+printf("\n Energy of the photon is %0.3f  ev",E)
diff --git a/3769/CH24/EX24.9/Ex24_9.sce b/3769/CH24/EX24.9/Ex24_9.sce
new file mode 100644
index 000000000..decfd7bb8
--- /dev/null
+++ b/3769/CH24/EX24.9/Ex24_9.sce
@@ -0,0 +1,11 @@
+clear
+//Given
+n=2.0
+n1=3.0
+
+//Calculation
+E2=-13.6/n**2
+E3=-13.6/n1**2
+
+//Result
+printf("\n Energies of two energy level is %0.3f ev and %0.2f ev",E2,E3)