blob: 1dc265daac69a7c7c15f4908ed2f2b9fd62c1680 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
//Book Name:Fundamentals of Electrical Engineering
//Author:Rajendra Prasad
//Publisher: PHI Learning Private Limited
//Edition:Third ,2014
//Ex3_5.sce
clc;
clear;
R=2;
L=2;
C=1/12;
omega=3;
XL=omega*L;
XC=1/(omega*C);
Z=complex(R,XL-XC);
Vl=12*sqrt(2);
theta=30;
V=complex(Vl*cosd(theta),Vl*sind(theta));
I=V/Z;
I_mag=sqrt(real(I)^2+imag(I)^2);
I_angle=atand(imag(I)/real(I));
printf("\n Current flow through the given circuit=%d angle:%d degree \n",I_mag,I_angle)
XL=complex(0,6);
V_L=I*XL;
V_L_mag=sqrt(real(V_L)^2+imag(V_L)^2);
V_L_angle=atand(imag(V_L)/real(V_L));
printf("\n Voltage across the inductance=%d angle:%2.0f degree \n",V_L_mag,V_L_angle)
//result:Vl(t)=36 sin(wt+75) , i(t)=6 sin(wt-15)
|
