clc; h=6.63*10^-34; //Plancks constant in J.sec m=9.1*10^-31; //mass in kg r1=5.3*10^-11; //radius in m v=h/(2*%pi*m*r1); //calculating velocity in m/sec disp(v,"Velocity in m/sec = "); //displaying result