summaryrefslogtreecommitdiff
path: root/3875/CH1/EX1.9/Ex1_9.sce
blob: 7ac8c7fff5e1edbdab3e6ede0710a076532faacf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
clc;
clear;
R=30 // resistance in ohm
L= 20*10^-3 //inductance in H
f=1000/%pi //frequency in Hz
V=25 //in volt

//calculation
// for (a)
inductance_l=2*%pi*f*L //in ohm
Z=sqrt(R^2+inductance_l^2) //in ohm
C=L/Z^2 

mprintf("\n(a) The capacitance of the circuit is %0.0e F\n",C)

//for(b)

dynamic_imp=L/(C*R) //in ohm
I_min=V/dynamic_imp

mprintf("\n(b) The value of current is = %0.1f A",I_min)