summaryrefslogtreecommitdiff
path: root/1760/CH8/EX8.19
diff options
context:
space:
mode:
Diffstat (limited to '1760/CH8/EX8.19')
-rwxr-xr-x1760/CH8/EX8.19/EX8_19.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/1760/CH8/EX8.19/EX8_19.sce b/1760/CH8/EX8.19/EX8_19.sce
new file mode 100755
index 000000000..8768e78a4
--- /dev/null
+++ b/1760/CH8/EX8.19/EX8_19.sce
@@ -0,0 +1,21 @@
+ //EXAMPLE 8-19 PG NO-534-535
+Ro=600; //characteristics Impedance
+Fc=1000; //cutt of frequency
+L=Ro/(4*%pi*Fc);
+disp('i) Inductance is = '+string ([L]) +' H ');
+C=1/[4*%pi*Fc*Ro];
+disp('ii) Capacitance is = '+string ([C]) +' F ');
+m=0.2;
+X=(2*C)/m; //X=2C/m;
+disp('iii) X is = '+string ([X]) +' F ');
+Y=L/m; Y=L/m;
+disp('iv) Y is = '+string ([Y]) +' H ');
+Z=(4*m*C)/[1-m^2];
+disp('v) Z is = '+string ([Z]) +' F ');
+m1=0.6;
+X1=(2*C)/m1; //X=2C/m;
+disp('iii) X is = '+string ([X1]) +' F ');
+Y1=(2*L)/m1; Y1=L/m1;
+disp('iv) Y is = '+string ([Y1]) +' H ');
+Z1=(2*m1*C)/[1-m1^2];
+disp('v) Z is = '+string ([Z1]) +' F ');