blob: e70e3d40c6f03da0484898923225b832b05bd3fd (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
//CHAPTER 2- STEADY-STATE ANALYSIS OF SINGLE-PHASE A.C. CIRCUIT
//Example 40 // read it as example 39 in the book on page 2.98
disp("CHAPTER 2");
disp("EXAMPLE 40");
//
//Given
//V=100.sin(314.t+5) V
//current is i=5.sin (314.t-40)
//VARIABLE INITIALIZATION
V=100; // max amplitude of wave
w=314; //angular speed
phiV=5; //phase angle in degrees
I=5; //max current amplitude
phiI=-40; //phase angle in current in deg
//
//SOLUTION
phi=phiI-phiV; // phase difference
pf=cos(phi*%pi/180); //convert to radians
p=(V/sqrt(2))*(I/sqrt(2))*pf;
//
disp(sprintf("The Power factor is %.3f lagging", pf));
disp(sprintf("The Power delivered is %.2f W", p));
disp(" ");
//
//END
|
