1 files changed, 23 insertions, 0 deletions
diff --git a/1694/CH3/EX3.13/EX3_13.sce b/1694/CH3/EX3.13/EX3_13.sce
new file mode 100644
index 000000000..f124c554d
--- /dev/null
+++ b/1694/CH3/EX3.13/EX3_13.sce
@@ -0,0 +1,23 @@
+clear;
+clc;
+printf("\nEx3.13\n");
+//page no.-130
+//given
+x=10^-14;......//diameter of nucleus in m
+h=6.626*10^-34;......//planck's constant in J-s
+m=1.67*10^-27;......//proton mass in kg
+e=1.6*10^-19;.......//charge in C
+c=3*10^8;...........//speed in m/sec
+
+p=h/(2*%pi*x).......//momentum in kg*m/s from uncertainty principle
+
+printf("\n minimum value of momentum is 1.055*10^-20 kg*m/s\n");
+
+E=p^2/(2*m*e).........//minimum kinetic energy in MeV
+
+printf("\nminimum K.E. is 0.23 Mev\n");
+
+r=m*c^2/e...........//rest mass energy of proton in MeV
+
+printf("\nrest mass energy is 942 MeV\n");
+printf("\nAS REST MASS IS VERY LARGE THAN K.E. SO,PRESENCE OF SUCH PROTONS IN NUCLEUS IS PERMITTED\n");