summaryrefslogtreecommitdiff
path: root/671/CH4/EX4.4/4_4.sce
blob: a278b7aaa967158b4167fe20b00b9dd5b25be552 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
/////////////////////part a
L=0.05
R=20
w=1.2E3
Xl=w*L
V=complex(100,200)
I=complex(5,0)

Xc=-imult(R+imult(Xl)-V/I)
C=1/w/Xc

disp(C)

/////////////////////part b
w=200
V=complex(100,0)
Xl=w*L
Xc=-imult(R+imult(Xl)-V/I)
C=1/w/Xc

disp(C)