1 files changed, 23 insertions, 0 deletions
diff --git a/3673/CH9/EX9.8/Ex9_8.sce b/3673/CH9/EX9.8/Ex9_8.sce
new file mode 100644
index 000000000..e27560a03
--- /dev/null
+++ b/3673/CH9/EX9.8/Ex9_8.sce
@@ -0,0 +1,23 @@
+//Example 9_8 page no:357
+clc;
+Zrymag=10;
+Zryang=30;
+Zybmag=10;
+Zybang=-45;
+Zbrmag=2.5;
+Zbrang=60;
+Zmag=16.98;
+Zang=0.33;
+//calculating the impedence magnitude and angle
+Zrmag=(Zrymag*Zbrmag)/Zmag;
+Zrang=Zryang+Zbrang-Zang;
+disp(Zrmag,"magnitude of Zr is(in ohm)");
+disp(Zrang,"angle of Zr is (in degree)");
+Zymag=(Zrymag*Zybmag)/Zmag;
+Zyang=Zryang+Zybang-Zang;
+disp(Zymag,"magnitude of Zy is(in ohm)");
+disp(Zyang,"angle part of Zy is (in degree)");
+Zbmag=(Zbrmag*Zybmag)/Zmag;
+Zbang=Zbrang+Zybang-Zang;
+disp(Zbmag,"magnitude of Zb is(in ohm)");
+disp(Zbang,"angle part of Zb is (in degree)");