From 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 Mon Sep 17 00:00:00 2001
From: prashantsinalkar
Date: Tue, 10 Oct 2017 12:27:19 +0530
Subject: initial commit / add all books

---
 3673/CH6/EX6.a.5/Example_a_6_5.sce | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 3673/CH6/EX6.a.5/Example_a_6_5.sce

(limited to '3673/CH6/EX6.a.5/Example_a_6_5.sce')

diff --git a/3673/CH6/EX6.a.5/Example_a_6_5.sce b/3673/CH6/EX6.a.5/Example_a_6_5.sce
new file mode 100644
index 000000000..cd8f129e6
--- /dev/null
+++ b/3673/CH6/EX6.a.5/Example_a_6_5.sce
@@ -0,0 +1,29 @@
+//Example_a_6_5 page no:235
+clc;
+R=5;
+Vmax=150;
+Zamag=60;
+Zaang=30;
+Zbmag=50;
+Zbang=-25;
+Zareal=Zamag*cosd(Zaang);
+Zbreal=Zbmag*cosd(Zbang);
+pf=cosd(0.179);
+Ztmag=5+((Zamag*Zbmag)/(Zamag+Zbmag));
+Ztang=-0.179;
+Itmag=150/(sqrt(Ztmag));
+Itang=0-(Ztang);
+Zareal=65.84;
+Zbreal=57.15;
+Iamag=((2.97*50)/(60+50));
+Ibmag=((2.97*60)/(60+50));
+Za=Iamag^2*Zareal;
+Zb=Ibmag^2*Zbreal;
+Rt=R+((Zareal*Zbreal)/(Zareal+Zbreal));
+I=Vmax/(sqrt(2)*Rt);//calculating current for calculating the power
+Pa=I^2*Rt;
+disp(pf,"the power factor is ");
+disp(Za,"the power delivered to Za is (in W)");
+disp(Zb,"the power delivered to Zb is (in W)");
+disp(Pa,"the average power delivered to the circuit is (in W)");
+disp("the calculated values varies slightly with textbook hence values are rounded off in text book");
-- 
cgit