summaryrefslogtreecommitdiff
path: root/2360/CH6/EX6.23
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2360/CH6/EX6.23
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2360/CH6/EX6.23')
-rwxr-xr-x2360/CH6/EX6.23/ex6_23.sce28
1 files changed, 28 insertions, 0 deletions
diff --git a/2360/CH6/EX6.23/ex6_23.sce b/2360/CH6/EX6.23/ex6_23.sce
new file mode 100755
index 000000000..771f3266a
--- /dev/null
+++ b/2360/CH6/EX6.23/ex6_23.sce
@@ -0,0 +1,28 @@
+// Exa 6.23
+format('v',7);clc;clear;close;
+// Given data
+f = 1;// in kHz
+f = f * 10^3;// in Hz
+R1 = 600;// in ohm
+C1 = 1;// in µF
+C1 = C1 * 10^-6;// in F
+XC1= 1/(2*%pi*f*C1);
+R2 = 100;// in ohm
+R3 = 1;// in k ohm
+R3 = R3 * 10^3;// in ohm
+omega = 2*%pi*f;// in rad/sec
+Y1= 1/R1+%i*1/XC1;// in Ω
+Z2=R2;// in Ω
+Z3= R3;// in Ω
+// From balance equation, Z1*Z4= Z2*Z3
+Z4= Z2*(Z3*Y1);// in Ω
+R4= real(Z4);// in Ω
+XL4= abs(imag(Z4));// in Ω
+L4= XL4/(2*%pi*f);// in F
+disp("Rx= "+string(R4)+" Ω")
+disp("Lx= "+string(L4)+" H")
+
+
+
+
+