summaryrefslogtreecommitdiff
path: root/1319/CH1/EX1.30/1_30.sce
diff options
context:
space:
mode:
Diffstat (limited to '1319/CH1/EX1.30/1_30.sce')
-rw-r--r--1319/CH1/EX1.30/1_30.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/1319/CH1/EX1.30/1_30.sce b/1319/CH1/EX1.30/1_30.sce
new file mode 100644
index 000000000..26198cb29
--- /dev/null
+++ b/1319/CH1/EX1.30/1_30.sce
@@ -0,0 +1,17 @@
+//Determine the resultant current for two alternating currents
+
+clc;
+clear;
+
+ti1=30;
+ti2=45;
+
+i1=20*(expm(%i*%pi/6));
+i2=40*(expm(%i*%pi/4));
+
+i=i1+i2;
+
+ti=atand(imag(i)/real(i));
+
+printf('The resultant current = %g sin(314t + %g(degrees)) A\n',abs(i),ti)
+printf(' Or %g/_%g A\n',abs(i),ti)