V=200
R=2
L=0.02

f=25
w0=2*%pi*f
C=1/(w0*w0*L)
I=V/2
Vc=1/(C*w0)
disp(I,Vc)

f=50
w0=2*%pi*f
C=1/(w0*w0*L)
I=V/2
Vc=1/(C*w0)
disp(I,Vc)

f=100
w0=2*%pi*f
C=1/(w0*w0*L)
I=V/2
Vc=1/(C*w0)
disp(I,Vc)