summaryrefslogtreecommitdiff
path: root/1049/CH10/EX10.5/ch10_5.sce
blob: a97bda417c702d7e140849e97f84aa68c412021a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
clear;
clc;
V_s=400;
V_ph=V_s/2;
V_l=V_ph*sqrt(3);
a=160;
r=cosd(180-a);
m=6;
V_or=r*(V_l*(m/%pi)*sin(%pi/m));    printf("rms o/p voltage=%.2f V",V_or);
R=2;
X_L=1.5;
th=atand(X_L/R);
Z=sqrt(R^2+X_L^2);
I_or=V_or/Z;    printf("\nrms o/p current=%.2f A",I_or);
printf("\nphase angle of o/p current=%.2f deg",-th)
P=I_or^2*R;    printf("\no/p power=%.2f W",P);