summaryrefslogtreecommitdiff
path: root/3836/CH16/EX16.2/Ex16_2.sce
blob: d0bd683199d10535b7891ad6e5f2003909fd13f2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
clear
//

//Initialisation
pf=0.75                          //power factor
S=2000                           //apparent power in VA
V=240                             //Voltage in volts

//Calculation 
apf=S*pf                          //active power
sin1=sqrt(1-(pf**2)) 
Q=S*sin1                         //Reactive Power
I=S*V**-1                          //Current
//Result
printf("\n  Apparent Power, P = %d W",S)

printf("\n  Active Power, P = %d W",apf)

printf("\n  Reactive Power, Q = %d var",Q)

printf("\n  Current I = %.2f A",I)