1 files changed, 11 insertions, 0 deletions

diff --git a/3845/CH30/EX30.2/Ex30_2.sce b/3845/CH30/EX30.2/Ex30_2.sce
new file mode 100644
index 000000000..89deb4c5a
--- /dev/null
+++ b/3845/CH30/EX30.2/Ex30_2.sce
@@ -0,0 +1,11 @@
+//Example 30.2

+Z=74-1;//Effective charge for tungsten

+E_0=13.6;//Ground-state energy (eV)

+n1=1;//n=1 shell

+E_1=-Z^2/n1^2*E_0;//Energy level for n=1 shell (eV)

+n2=2;//n=2 shell

+E_2=-Z^2/n2^2*E_0;//Energy level for n=2 shell (eV)

+E_K_alpha=E_2-E_1;//K_alpha x-ray energy (eV)

+printf('Approximate energy of the K_alpha x-ray = %0.1f keV',E_K_alpha/1000)

+//Openstax - College Physics

+//Download for free at http://cnx.org/content/col11406/latest