summaryrefslogtreecommitdiff
path: root/671/CH6/EX6.19/6_19.sce
blob: 710ebeca43c67fc08a9e752e7c1153380e25069a (plain)
1
2
3
4
5
6
7
8
V=400
Z=complex(40,30)

Iph=V/Z
Il=sqrt(3)*norm(Iph)
Ptotal=sqrt(3)*Il*V*cos(atan(imag(Z)/real(Z)))

disp(Iph,Il,Ptotal)