1 files changed, 15 insertions, 0 deletions
diff --git a/1430/CH6/EX6.2/exa6_2.sce b/1430/CH6/EX6.2/exa6_2.sce
new file mode 100644
index 000000000..f14941def
--- /dev/null
+++ b/1430/CH6/EX6.2/exa6_2.sce
@@ -0,0 +1,15 @@
+// Example 6.2
+// Calculations with Complex Numbers
+A=complex(8,3); 
+B=complex(0,100);
+C=complex(3,-4);
+// Since we need to compute D= A+B/C
+T=B/C;
+D=A+T;
+mag= abs(D);
+theta_d=atan(imag(D),real(D))
+disp(D,"In rectangular form=");
+disp("In polar form=");
+disp(mag,"Magnitude");
+disp((theta_d*180)/%pi,"Phase angle(in degree)="); // Conversion from radian to
+// degree