blob: c61a9990d68cb3d2dbd6e1d11524c30e08dadca3 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
//Exa:2.2.1
clc;
clear;
close;
I_L=10//line current (in amp)
V_s=20*10^3//supply voltage(in volts)
pf=0.8//lagging
theta=acosd(pf)
V_LN=V_s/sqrt(3)
disp(V_LN*10^-3,'(a)line to neutral voltage(in kv)=')
V_L=V_LN
disp(V_L*10^-3,'(b)output line to line voltage(in kv)=')
kVA=sqrt(3)*V_s*10^-3*I_L
disp(kVA,'(c)kVA=')
kW=kVA*pf
disp(kW,'kW=')
kVAR=kVA*sind(theta)
disp(kVAR,'kVAR=')
|
