1 files changed, 13 insertions, 0 deletions
diff --git a/1760/CH8/EX8.21/EX8_21.sce b/1760/CH8/EX8.21/EX8_21.sce
new file mode 100755
index 000000000..0875575f6
--- /dev/null
+++ b/1760/CH8/EX8.21/EX8_21.sce
@@ -0,0 +1,13 @@
+                 //EXAMPLE 8-21   PG NO-536-537
+Ro=600;                      //RESISTANCE
+Fc=10000;                    //FREQUENCY
+F=25000;
+L=Ro/(4*%pi*Fc);
+C=1/(4*%pi*Fc*Ro);
+Z=Ro*[1-(Fc/F)^2]^0.5;
+Zo=Ro/[1-(Fc/F)^2]^0.5;
+disp('i) INDUCTAR (L) is    =  '+string (L) +'  H ')
+disp('ii) CAPACITOR (C) is    =  '+string (C) +'  F ')
+disp('i) IMPEDANCE (Z) is    =  '+string (Z) +'  ohm ')
+disp('ii) IMPEDANCE (Zo) is    =  '+string (Zo) +'  ohm ')
+