summaryrefslogtreecommitdiff
path: root/1109/CH13/EX13.19/13_19.sce
blob: ed963100563662ae44e0e50b5cd924e804628d6f (plain)
1
2
3
4
5
6
7
8
clear;
clc;
R1=3;R2=2;R3=2;
A=(R3+R3+R2+R2)/(R1+R3+R1+R2);
Zi1=sqrt((R2*(R1+R3)+(R1*R2))/A);
printf("Zi1 = %f ohms\n",round(Zi1*10)/10);
Zi2=R2+(R3*(R1+Zi1)/(R3+R1+Zi1));
printf(" Zi2 = %f ohms\n",round(Zi2*10)/10);