summaryrefslogtreecommitdiff
path: root/671/CH4/EX4.29/4_29.sce
blob: fd0999d184d1d72ee7952785b73a037f99ac648a (plain)
1
2
3
4
5
6
7
8
9
10
w=10
R=2
L=0.3
Ir=10*(cos(%pi/4)+%i*sin(%pi/4))
Vr=Ir*R
Vc=20*(cos(%pi/4)-%i*sin(%pi/4))
V=Vr+Vc
Ic=Ir
C=Ic/(w*Vc*%i)
disp(real(C))      ///////Wrong in book