summaryrefslogtreecommitdiff
path: root/323/CH5/EX5.15/ex5_15.sci
blob: 795fdb8063d802c9fdc94a4a59769f165c645044 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
//Chapter 5,Ex5.16,Pg5.18
clc;
//Let x=cos(phi) and y=sin(phi)
x=0.8
y=0.6
vr=1
vx=5
//For 0.8 lagging power factor
percentreg=vr*x+vx*y
printf("\n Percentage regulation=%.1f percent \n",percentreg)
//For unity power factor
x=1
y=0
percentreg=vr*x+vx*y
printf("\n Percent regulation=%.0f percent \n",percentreg)
//For 0.8 leading pf
x=0.8
y=0.6
percentreg=vr*x-vx*y
printf("\n Percent regulation=%.1f percent \n",percentreg)