From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 503/CH3/EX3.18/ch3_18.sci | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 503/CH3/EX3.18/ch3_18.sci

(limited to '503/CH3/EX3.18')

diff --git a/503/CH3/EX3.18/ch3_18.sci b/503/CH3/EX3.18/ch3_18.sci
new file mode 100755
index 000000000..7970ad308
--- /dev/null
+++ b/503/CH3/EX3.18/ch3_18.sci
@@ -0,0 +1,24 @@
+// To calculate sec. line voltage, line current and output va
+
+clc;
+
+disp('(a)Y/D conn');
+V_LY=6600;
+V_PY=V_LY/sqrt(3);
+a=12;
+V_PD=V_PY/a;
+V_LD=V_PD;    disp(V_LD,'sec line voltage(V)');
+
+I_PY=10;
+I_PD=I_PY*a;
+I_LD=I_PD*sqrt(3);    disp(I_LD,'sec. line current(A)');
+r=sqrt(3)*V_LD*I_LD;    disp(r,'output rating(va)');
+
+disp('(b)D/Y conn');
+I_LD=10;
+I_PD=I_LD/sqrt(3);
+I_LY=I_PD*a;        disp(I_LY,'sec. line current(A)');
+V_PD=6600;
+V_PY=V_PD/a;
+V_LY=V_PY*sqrt(3);    disp(V_LY,'sec line voltage(V)');
+r=sqrt(3)*V_LY*I_LY;    disp(r,'output rating(va)');
\ No newline at end of file
-- 
cgit