1 files changed, 17 insertions, 0 deletions
diff --git a/3673/CH9/EX9.a.7/Example_a_9_7.sce b/3673/CH9/EX9.a.7/Example_a_9_7.sce
new file mode 100644
index 000000000..a63caefca
--- /dev/null
+++ b/3673/CH9/EX9.a.7/Example_a_9_7.sce
@@ -0,0 +1,17 @@
+//Example_a_9_7 page no:407
+clc;
+Z=3+(%i*4);
+Vrymag=1;//here Vrymag is assumed to be one hence it will be cancelled out in simplification unless the variable cannot be used without initializing
+Vryang=0;
+Vybmag=1;//here Vrymag is assumed to be one hence it will be cancelled out in simplification unless the variable cannot be used without initializing
+Vybang=-120;
+Vmag=Vrymag/Vybmag;
+Vang=Vybang-Vryang;
+Vreal=Vmag*cosd(Vang);
+Vimag=Vmag*sind(Vang);
+V=Vreal+(%i*Vimag);
+Zyb=V*Z;
+R=real(Zyb);
+X=-imag(Zyb);//here negative sign is used hence only the magnitude is required
+disp(R,"the value of R is (in ohm)");
+disp(X,"the value of X(capacitive reactance) is (in ohm)");