summaryrefslogtreecommitdiff
path: root/3689/CH13/EX13.3/13_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3689/CH13/EX13.3/13_3.sce')
-rw-r--r--3689/CH13/EX13.3/13_3.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/3689/CH13/EX13.3/13_3.sce b/3689/CH13/EX13.3/13_3.sce
new file mode 100644
index 000000000..e3e99328f
--- /dev/null
+++ b/3689/CH13/EX13.3/13_3.sce
@@ -0,0 +1,11 @@
+////Variable Declaration
+p0 = 0.633 //Probabilities of Energy level 1,2,3
+p1 = 0.233
+p2 = 0.086
+
+//Calculation
+p4 = 1. -(p0+p1+p2)
+
+//Results
+printf("\n Probability of finding an oscillator at energy level of n>3 is %4.3f i.e.%4.1f percent",p4,p4*100)
+