1 files changed, 19 insertions, 0 deletions
diff --git a/1760/CH7/EX7.18/EX7_18.sce b/1760/CH7/EX7.18/EX7_18.sce
new file mode 100755
index 000000000..a4561361b
--- /dev/null
+++ b/1760/CH7/EX7.18/EX7_18.sce
@@ -0,0 +1,19 @@
+                            //EXAMPLE 7-18  PG NO-477-478
+Ra=7;
+Rb=3;
+Rc=3;
+A=(Ra+Rb)/Rb;
+disp(' A  is   = '+string(A)+'');
+B=Ra+Rc+[(Ra*Rc)/Rb];
+disp(' B is   = '+string(B)+'');
+C=1/Rb;
+disp(' C is   = '+string(C)+'');
+D=(Rb+Rc)/Rb;
+disp(' D is   = '+string(D)+'');
+Z11=[(A*B)/(C*D)]^0.5;
+disp(' Impedance is   = '+string(Z11)+'ohm');
+Z12=[(B*D)/(A*C)]^0.5;
+disp(' Impedance is   = '+string(Z12)+'ohm');
+Q=1/cosh(2.62);
+Y12=-(1/17);
+disp(' Admittance is   = '+string(Y12)+'siemens');