summaryrefslogtreecommitdiff
path: root/3554/CH11/EX11.8/Ex11_8.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3554/CH11/EX11.8/Ex11_8.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3554/CH11/EX11.8/Ex11_8.sce')
-rw-r--r--3554/CH11/EX11.8/Ex11_8.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/3554/CH11/EX11.8/Ex11_8.sce b/3554/CH11/EX11.8/Ex11_8.sce
new file mode 100644
index 000000000..b9511ba11
--- /dev/null
+++ b/3554/CH11/EX11.8/Ex11_8.sce
@@ -0,0 +1,21 @@
+// Exa 11.8
+
+ clc;
+clear all;
+
+// Given data
+
+w=3000; // Angular frequency in rad/s
+R2=10*10^3; // Ohms
+R1= 2*10^3; // Ohms
+C1=1*10^-6; // farads
+R3=1*10^3; // Ohms
+
+// Solution
+
+// Using equations 11.19 and 11.18 (page no.326)to find values of Rx and Lx
+
+Rx=w^2*R1*R2*R3*C1^2/(1+w^2*R1^2*C1^2);
+Lx=R2*R3*C1/(1+w^2*R1^2*C1^2);
+
+printf(' The series equivalent inductance and resistance of the network consist of\n Rx of %.2f k Ohms and Lx of %d mH \n',Rx/1000,Lx*10^3);