blob: a6b0fa3ccbc32b18f34df78e575fe45b1dfc8489 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
// Exa 5.7
clc;
clear;
close;
format('v',6)
// Given data
W1 = 2000;// in W
W2 = 500;// in W
phi = (atand( sqrt(3)*((W1-W2)/(W1+W2)) ));// in lag
// power factor
pf= cosd(phi);// lagging
disp("Part (i) : Power factor is : "+string(pf)+" lagging");
W2 = -W2;// in W
phi = (atand( sqrt(3)*((W1-W2)/(W1+W2)) ));// in lag
// power factor
pf= cosd(phi);// lagging
disp("Part (ii) : Power factor is : "+string(pf)+" lagging");
|
