summaryrefslogtreecommitdiff
path: root/2471/CH8/EX8.3
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2471/CH8/EX8.3
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2471/CH8/EX8.3')
-rwxr-xr-x2471/CH8/EX8.3/Ex8_3.sce25
1 files changed, 25 insertions, 0 deletions
diff --git a/2471/CH8/EX8.3/Ex8_3.sce b/2471/CH8/EX8.3/Ex8_3.sce
new file mode 100755
index 000000000..39218f66f
--- /dev/null
+++ b/2471/CH8/EX8.3/Ex8_3.sce
@@ -0,0 +1,25 @@
+clear ;
+clc;
+// Example 8.3
+printf('Example 8.3\n\n');
+printf('Page No. 226\n\n');
+
+// given
+R = 6;// Resistance in ohm
+Xc = 16;// Capacitive resistance in ohm
+Xl = 24;// Inductive resistance in ohm
+Z = ((R^2) + (Xc - Xl)^2)^0.5;// Impedance in ohm
+P_f = R/Z;// Power factor = cos(x) = 0.6
+x = acos(0.6);
+y = sqrt(1 - P_f^2);//y = sin (x)
+V = 200;// in Volts(sin wave voltage = ((200*2^1.5)*sinwt)
+I = V/Z;// Current in Amperes
+P = I^2 * R;// in W
+Q = V * I * y;// in VAR
+S = V * I;// in VA
+printf('The actual power is %.0f W \n',P)
+printf('The reactive power is %.0f VAR \n',Q)
+printf('The apparent power is %.0f VA \n',S)
+
+
+