summaryrefslogtreecommitdiff
path: root/3673/CH9/EX9.25/Ex9_25.sce
blob: b6c4465837651c125b29d41974d38aedea96f972 (plain)
1
2
3
4
5
6
7
8
9
10
//Example 9_25 page no:395
clc;
//given
P=4488;//power in VAR
V=440;
I=17;
sin_phi=P/(V*I);
phi=asind(sin_phi);
pow_fac=cosd(phi);
disp(pow_fac,"the power factor of the load is ");