l=200*10^(-6);
f=1.5*10^6;
r=100;
q=2*%pi*f*l/r;
disp("the quality of the coil is"); disp(q);