3793/CH15/EX15.1/exp_15_1.sce


1
2
3
4
5
6
7
8
9
10
11

clear;
clc;
Pdc=1;
Pac=1;
phi=acosd(.9428);
mprintf(" power factor angle in degree is %.3f ",phi);
p=[0.7:0.1:1];
Pd=(.9428/(p));
disp(Pd);
disp(p);
plot(p,Pd);