2 files changed, 21 insertions, 0 deletions
diff --git a/446/CH9/EX9.4/9_4.sce b/446/CH9/EX9.4/9_4.sce
new file mode 100755
index 000000000..b5f5164b0
--- /dev/null
+++ b/446/CH9/EX9.4/9_4.sce
@@ -0,0 +1,12 @@
+clear 
+clc
+disp('Exa-9.4');
+hc=1240;        //in eV.nm
+m=0.5*1.008*931.5*10^6;              //mass of hydrogen atom
+Req=0.074;                          //equivalent radius
+a=((hc)^2)/(4*(%pi^2)*m*(Req^2));  //reduced mass of hydrogen atom
+for L=1:3,
+        delE= L*a; printf('The value of energy is %f eV\n',delE);                  
+        w=(hc)/delE;printf('The respective wavelength is is %f um\n',w*10^-3);  
+end
+
diff --git a/446/CH9/EX9.4/9_4.txt b/446/CH9/EX9.4/9_4.txt
new file mode 100755
index 000000000..104968c29
--- /dev/null
+++ b/446/CH9/EX9.4/9_4.txt
@@ -0,0 +1,9 @@
+  
+ Exa-9.4   
+The value of energy is 0.015150 eV
+The respective wavelength is is 81.849284 um
+The value of energy is 0.030300 eV
+The respective wavelength is is 40.924642 um
+The value of energy is 0.045449 eV
+The respective wavelength is is 27.283095 um
+ 
+\ No newline at end of file