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

---
 343/CH2/EX2.74/ex2_74.sce | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100755 343/CH2/EX2.74/ex2_74.sce

(limited to '343/CH2/EX2.74/ex2_74.sce')

diff --git a/343/CH2/EX2.74/ex2_74.sce b/343/CH2/EX2.74/ex2_74.sce
new file mode 100755
index 000000000..105d45606
--- /dev/null
+++ b/343/CH2/EX2.74/ex2_74.sce
@@ -0,0 +1,30 @@
+clc
+Z1=14+%i*5;          //Assigning values to parameters
+Z2=18+%i*10;
+V=200;
+Y1=1/Z1;
+Y2=1/Z2;
+Yeq=Y1+Y2;
+Zeq=1/Yeq;
+I1=V/Z1;
+I2=V/Z2;
+I=V/Zeq;
+P1=I1^2*real(Z1);
+P2=I2^2*real(Z2);
+[r,t]=polar(Zeq);
+[r1,t1]=polar(Z1);
+[r2,t2]=polar(Z2);
+pf1=cos(t1);
+pf2=cos(t2);
+pf=cos(t);
+disp("Mho",Y1,polar(Y1),"Y1");
+disp("Mho",Y2,polar(Y2),"Y2");
+disp("Mho",Yeq,polar(Yeq),"Yeq");
+disp("Amperes",I1,polar(I1),"Branch current I1");
+disp("Amperes",I2,polar(I2),"Branch current I2");
+disp("Amperes",I,polar(I),"Total current I");
+disp("Watts",P1,polar(P1),"Power consumed by branch 1");
+disp("Watts",P2,polar(P2),"Power consumed by branch 2");
+disp(polar(pf1),"Power factor of branch 1");
+disp(polar(pf2),"Power factor of branch 2");
+disp(polar(pf),"Total Power factor");
\ No newline at end of file
-- 
cgit