clc; c=3*10^8; //velocity in m/sec n=2.42; //refractive index v=c/n; //calculating velocity disp(v,"Velocity in m/sec = "); //diplaying result