summaryrefslogtreecommitdiff
path: root/377/CH1/EX1.10/1_10.sce
diff options
context:
space:
mode:
Diffstat (limited to '377/CH1/EX1.10/1_10.sce')
-rw-r--r--377/CH1/EX1.10/1_10.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/377/CH1/EX1.10/1_10.sce b/377/CH1/EX1.10/1_10.sce
new file mode 100644
index 000000000..0d9bb7231
--- /dev/null
+++ b/377/CH1/EX1.10/1_10.sce
@@ -0,0 +1,21 @@
+disp("En=-(13.6)*(Z^2)/(n^2)");
+n1=1;n2=2;n3=3;
+Z=3;
+h=6.6*10^-34;
+c=3*10^8;
+E1=-(13.6)*(Z^2)/(n1^2);
+E2=-(13.6)*(Z^2)/(n2^2);
+E3=-(13.6)*(Z^2)/(n3^2);
+printf('\n The value of E1 is %f eV',E1);
+printf('\n The value of E2 is %f eV',E2);
+printf('\n The value of E3 is %f eV',E3);
+a1=91.8;a2=108.8;a3=114.75; //say a1,a2,a3 are hv1,hv2,hv3 respectively
+v1=a1*1.6*(10^-19)/(h);
+v2=a2*1.6*(10^-19)/(h);
+v3=a3*1.6*(10^-19)/(h);
+//say b1,b2,b3 are λ1,λ2,λ3 respectively
+b1=c/v1;b2=c/v2;b3=c/v3;
+c1=b1*10^9;c2=b2*10^9;c3=b3*10^9;
+printf('\n The value of λ1 is %f nm',c1);
+printf('\n The value of λ2 is %f nm',c2);
+printf('\n The value of λ3 is %f nm',c3); \ No newline at end of file