summaryrefslogtreecommitdiff
path: root/3689/CH13/EX13.4/13_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '3689/CH13/EX13.4/13_4.sce')
-rw-r--r--3689/CH13/EX13.4/13_4.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/3689/CH13/EX13.4/13_4.sce b/3689/CH13/EX13.4/13_4.sce
new file mode 100644
index 000000000..a83b21005
--- /dev/null
+++ b/3689/CH13/EX13.4/13_4.sce
@@ -0,0 +1,11 @@
+////Variable Declaration
+p0 = 0.394 //Probabilities of Energy level 1,2,3
+p1by2 = 0.239
+p2 = 0.145
+
+//Calculation
+p4 = 1. -(p0+p1by2+p2)
+
+//Results
+printf("\n Probability of finding an oscillator at energy level of n>3 is %4.3f",p4)
+