blob: 85124d51253dd8df3ce0a20ad1f938d57d046b9b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
// To find the current and power of a capacitive circuit
clc;
clear;
Z=10-25*%i;
V=15;
I=V/Z;
theta=atand(imag(I)/real(I));
Pr=V*abs(I)*cosd(theta);
Pq=V*abs(I)*sind(theta);
disp('A',I,'The current flowing through the given impedance =')
disp('watt',Pr,'The real power loss of the capacitive impedance =')
disp('Var',-Pq,'The reactive power of the capacitive circuit =')// Negative sign indicates power genrated.
|
