summaryrefslogtreecommitdiff
path: root/2672/CH3/EX3.21/Ex3_21.sce
blob: 8a47e33080387f36b601679f2360d4c074f005c0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//Example 3_21
clc;
clear;
close;
format('v',5);
//given data :
L=100;//mH
//i=14.148sin(314*t+%pi/6)
//v=325*sin(314*t)
Vm=325;//V
Im=14.14;//A
omega=314;//rad/s
V=Vm/sqrt(2);//V
I=Im/sqrt(2);//A
Z=V/(I*expm(%i*%pi/6));//ohm
R=real(Z);//ohm
disp(R,"Value of R(ohm)");
XCL=-imag(Z);//ohm//XCL=XC-XL
XC=XCL+omega*L/1000;//ohm
C=1/XC/omega;//F
C=C*10^6;//micro F
disp(C,"Value of C(micro F)");
//Answer is not accurate in the book.