summaryrefslogtreecommitdiff
path: root/3871/CH12/EX12.4/Ex12_4.sce
blob: 67e8192060dccc7d9aa2b669019bf9bf268d893f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//===============================================================================
//Chapter 12 Example 4

clc;clear all;

//variable declaration
R2         = 1000; 		//resistance of arm  in  Ω
R3         = 1000; 		//resistance of arm  in  Ω
R4         = 1000; 		//resistance of arm  in  Ω
C4        = 0.5*10^-6;		//capacitance in F

//calculations
R1    = ((R2*R3)/(R4));		//resistance of coil in Ω
L1     = C4*R2*R3;			//inductance of inductor in H

//result
mprintf("resistance of coil  = %3.2f Ω",R1);
mprintf("\ninductance of inductor = %3.2f H",L1);