summaryrefslogtreecommitdiff
path: root/3775/CH3/EX3.8/Ex3_8.sce
blob: fea42e53b44a89c54218585fdd18a8f87afbca97 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Ex 3.8 page 123

clc;
clear;
close;

R=5;// ohm
L=1;// H
E=10;// V
Vs=230;// V
f=50;// Hz
alpha = 45;// degree
Vm=Vs*sqrt(2);// V
Vo=Vm/%pi*(1+cos(alpha*%pi/180));// V
printf(' Average load voltage = %.2f V', Vo)
Io=(Vo-E)/R;// A
printf('\n Average load current = %.2f A', Io)
PF=(Io**2*R+E*Io)/Vs/Io;// power factor
printf('\n Power factor = %.4f',PF)