blob: 5eedb09011aff0053a48463f89b4d932234b2a65 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
//Example_a_5_2 page no:202
clc;
V=10;
Z=100+(((125.66*%i)*(314.15*%i))/((125.66*%i)+(314.15*%i)));
Zmag=sqrt(real(Z)^2+imag(Z)^2);
Zang=atand(imag(Z)/real(Z));
disp(Zmag,"the magnitude of impedence is (in ohm)");
disp(Zang,"the angle of impedence is (in degree)");
Imag=V/Zmag;
Iang=0-Zang;
disp(Imag,"the magnitude of current is (in A)");
disp(Iang,"the angle of current is (in degree)");
//inductance value is doubled
Z=100+(%i*179.7);
Zmag=sqrt(real(Z)^2+imag(Z)^2);
Zang=atand(imag(Z)/real(Z));
disp(Zmag,"the magnitude of impedence is (in ohm)");
disp(Zang,"the angle of impedence is (in degree)");
|
