summaryrefslogtreecommitdiff
path: root/509/CH18/EX18.1/18_1.sci
diff options
context:
space:
mode:
Diffstat (limited to '509/CH18/EX18.1/18_1.sci')
-rw-r--r--509/CH18/EX18.1/18_1.sci14
1 files changed, 14 insertions, 0 deletions
diff --git a/509/CH18/EX18.1/18_1.sci b/509/CH18/EX18.1/18_1.sci
new file mode 100644
index 000000000..451809f22
--- /dev/null
+++ b/509/CH18/EX18.1/18_1.sci
@@ -0,0 +1,14 @@
+// Chapter 18 Example 1//
+clc
+clear
+//line to ground capacitance= c,supply frequency=f//
+//inductance of the coil =l//
+f=50;
+c=0.2*10^-6;
+l=1/(3*(2*%pi*f)^2*c);
+printf("\n Inductance of the coil %.2f H\n",l);
+//kVA rating of the coil = kVA,operating voltage =v//
+v=132; // in kV//
+vph=v*10^3/sqrt(3);
+kVA=vph^2/(2*%pi*f*l);
+printf("\n kVA rating is given by %.f kVA\n",kVA/10^3);// to get ans in kVA divide by 10^3//