summaryrefslogtreecommitdiff
path: root/446/CH7/EX7.2/7_2.sce
diff options
context:
space:
mode:
Diffstat (limited to '446/CH7/EX7.2/7_2.sce')
-rwxr-xr-x446/CH7/EX7.2/7_2.sce6
1 files changed, 6 insertions, 0 deletions
diff --git a/446/CH7/EX7.2/7_2.sce b/446/CH7/EX7.2/7_2.sce
new file mode 100755
index 000000000..2375d12c8
--- /dev/null
+++ b/446/CH7/EX7.2/7_2.sce
@@ -0,0 +1,6 @@
+clear
+clc
+disp('Exa-7.2');
+// calculating radial probability P= (4/ao^3)*inegral(r^2 * e^(-2r/ao)) between the limits 0 and ao for r
+Pr=integrate('((x^2)*%e^(-x))/2','x',0,2);// simplifying where as x=2*r/a0; hence the limits change between 0 to 2
+printf('Hence the probability of finding the electron nearer to nucleus is %.3f',Pr);