summaryrefslogtreecommitdiff
path: root/1367/CH2/EX2.4/2_4.sce
blob: 0c30387fe7a17dfa18da5b7e58bcae75d006b1ff (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
//Find radius of first orbit of electron in Hydrogen atom
//Ex:2.4
clc;
clear;
close;
n=1;//first orbit
e_0=8.85*10^-12;//permittivity in freee space
h=6.62*10^-34;//planck's constant
m=9.1*10^-31;//mass of an electron in kg
e=1.6*10^-19;//charge of an electron in C
z=1;
r=n^2*e_0*h^2/(3.14*m*e^2*z);//radius of first orbit in m
r1=r*10^10;//radius in Angstorm
disp(r1,"Radius of first orbit of electron in Hydrogen atom (in Angstorm) = ");