1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
//Chapter-5, Example 5.4, Page 161
//=============================================================================
clc
clear
//INPUT DATA
I=10;//given current in A
P=1000;//power in Watts
V=250;//voltage in volts
f=25;//frequency in Hz
//CALCULATIONS
R=P/((I)^2);//resistance in ohms
Z=V/I;//impedance in ohms
Xl=sqrt((Z)^2-(R)^2);//reactance in ohms
L=Xl/(2*%pi*f);//inductance in Henry
Pf=R/Z;//power factor,lagging,pf=cos(phi)
mprintf("thus impedance,resistance,inductance,reactance and powerfactor are %d ohms,%d ohms,%1.3f H,%2.2f ohms and %1.1f respectively",Z,R,L,Xl,Pf);
//=================================END OF PROGRAM======================================================================================================
|
