blob: 042588a04215bb46f0c291c6c6468f5c4cb8e6af (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
//CHAPTER 2- STEADY-STATE ANALYSIS OF SINGLE-PHASE A.C. CIRCUIT
//Example 8
disp("CHAPTER 2");
disp("EXAMPLE 8");
//VARIABLE INITIALIZATION
v=300/sqrt(2); //in Volts
angle_v=110; //in degrees
I=15/sqrt(2); //in Amperes
angle_I=80; //in degrees
//SOLUTION
Z=v/I;
angle_Z=angle_v-angle_I;
disp(sprintf("The circuit impedance is %d Ω",Z));
disp(sprintf("The phase angle is %d degrees",angle_Z));
p_av=v*I*cos(angle_Z*(%pi/180)); //to convert angle_z from degrees to radians
disp(sprintf("The average power drawn is %f W",p_av));
//END
|