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

//Initialisation
V=50                     //Voltage
I=5                     //Current in Ampere r.m.s
phase=30                 //in degrees

//Calculation 
S=V*I                            //apparent power
pf=cos(phase*%pi/180)    //power factor
apf=S*pf                          //active power

//Result
printf("\n (a) Apparent power, S = %d VA",S)

printf("\n (b) Power Factor = %.3f",pf)

printf("\n (c) Active Power, P = %.1f",apf)