w=2*%pi*5*10^9
u=4*%pi*10^-7
a=5.8*10^7
r=sqrt((3.832^2+(%pi/2)^2)/(5000*2*%pi/300)^2)
h=2*r
del=sqrt(2/(w*u*a))
printf("\ndel=%.4e m",del)
Qc=47.7465*10^6/(9.3459*10^-7*5*10^9)*(3.832^2+(%pi/2)^2)^1.5/((3.832^2+(%pi/2)^2)+1)
printf("\nQc=%.2f",Qc)