blob: 09afc930d44ed8deb014a6d022dacd339a77232a (
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
28
29
30
31
32
33
34
35
36
|
clc
// Fundamental of Electric Circuit
// Charles K. Alexander and Matthew N.O Sadiku
// Mc Graw Hill of New York
// 5th Edition
// Part 2 : AC Circuits
// Chapter 11 : AC power Analysis
// Example 11 - 6
clear; clc; close;
//
// Given data
V_mag = 150.0000;
V_angle = 30.0000;
Z1 = complex(40,-30)
Z2 = complex(0,20)
//
// Calculations Zth
Zth = (Z1*Z2)/(Z1 + Z2)
// Calculation Vth
Vth = (Z2/(Z1 + Z2))*complex(V_mag*cosd(30.0000),V_mag*sind(30.0000));
Vth_mag = norm(Vth);
Vth_angle = atand(imag(Vth)/real(Vth));
// Calculations Resistance of Load Impedance
RL = norm(Zth);
// Calculation Maximum Average Power
I = Vth/(Zth + complex(RL,0));
I_mag = norm(I);
Pmax = 0.500 * (I_mag)^2 * RL;
//
disp("Example 11-5 Solution : ");
printf(" \n RL = Resistance of Load Impedance = %.3f Ohm",RL)
printf(" \n Pmax = Maximum Average Power Absorbed by Resistor = %.3f Watt",Pmax)
|