summaryrefslogtreecommitdiff
path: root/3507/CH1/EX1.7/Ex1_7.sce
blob: 3f9c9047021649ff11404ff882f9bf8d29e7f200 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//chapter1
//example1.7
//page14

V=50 // V
Rl=100 // ohm
Zi=100+50*%i
//for maximum power transfer load impedence should be conjugate of internal resistance so
Zl=100-50*%i

Zt=Zi+Zl
I=V/Zt
P=I^2*Rl

printf("load for maximum power (in ohms)=")
disp(Zl)

printf("maximum power transfered to load=%.3f W",P)