summaryrefslogtreecommitdiff
path: root/1760/CH3/EX3.35/EX3_35.sce
blob: dd5e310ffd8b7682d6c9dc455c42855b0ddaf344 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
      //EXAMPLE -3.35      PG NO-195
I.P=163.44;     //POWER INPUT
T.A.P=253.44;   //TOTAL ACTIVE POWER
R.P=122.58;   //REACTIVE POWER  INDUCTION  MOTOR
L=40;     //REACTIVE POWER OF SPECIAL LOAD
T.P=R.P+L;   //TOTAL REACTIVE POWER
S=301.1;   //P+JQ
X=T.A.P/S;    //OVERALL POWRER  FACTOR
IL=S*10^3/(1.732*400)
disp('i)TOTAL REACTIVE POWER    =  '+string (T.P)+' Kvar')
disp('i) S   =  '+string (S)+' KVA')
disp('i)OVERALL POWER FACTOR (x)   =  '+string (X)+' lagging')
disp('iiii)LOAD CURRENT (IL)   =  '+string (IL)+' A')