diff options
Diffstat (limited to '3871/CH12/EX12.7/Ex12_7.sce')
| -rw-r--r-- | 3871/CH12/EX12.7/Ex12_7.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/3871/CH12/EX12.7/Ex12_7.sce b/3871/CH12/EX12.7/Ex12_7.sce new file mode 100644 index 000000000..5bbde399b --- /dev/null +++ b/3871/CH12/EX12.7/Ex12_7.sce @@ -0,0 +1,21 @@ +//===============================================================================
+//Chapter 12 Example 7
+
+clc;clear all;
+
+//variable declaration
+R2 = 1000; //resistance of arm in Ω
+R3 = 500; //resistance of arm in Ω
+R4 = 1000; //resistance of arm in Ω
+C4 = 3*10**-6; //capacitance in F
+r = 100;
+
+//calculations
+R1 = ((R2*R3)/(R4)); //resistance of coil in Ω
+x = (r*(R3+R4))+(R3*R4)
+L1 = (C4*R2*x)/(R4); //inductance of inductor in H
+
+//result
+mprintf("resistance of coil = %3.2f Ω",R1);
+mprintf("\ninductance of inductor = %3.2fHenry",L1);
+
|