summaryrefslogtreecommitdiff
path: root/3836/CH16/EX16.3/Ex16_3.sce
diff options
context:
space:
mode:
Diffstat (limited to '3836/CH16/EX16.3/Ex16_3.sce')
-rw-r--r--3836/CH16/EX16.3/Ex16_3.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/3836/CH16/EX16.3/Ex16_3.sce b/3836/CH16/EX16.3/Ex16_3.sce
new file mode 100644
index 000000000..8acaf4d7d
--- /dev/null
+++ b/3836/CH16/EX16.3/Ex16_3.sce
@@ -0,0 +1,27 @@
+clear
+//
+
+//Initialisation
+pf=0.75 //power factor
+S=1500 //apparent power in W
+V=240 //Voltage in volts
+P1 = 2000 //apparent power
+P2 = 1500 //active power
+Q = 1322 //reactive power
+I = 8.33 //current in amp
+f=50 //frequency in hertz
+
+//Calculation
+Xc=V**2/Q //reactive capacitance
+C=1/(Xc*2*%pi*f) //capacitance
+I=S*V**-1 //current
+apf=S*pf //active power
+//Result
+printf("\n Apparent Power, S = %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)
+