summaryrefslogtreecommitdiff
path: root/695/CH3/EX3.5/Ex3_5.sce
blob: 1463be81b806d0ef4f5ac6de654eaffbe382efb7 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
//Caption:Determine the (a)No load power factor(b)iron loss component of current (c)magnetising component of current
//Exa:3.5
clc;
clear;
close;
f=50;//in Hz
W=80;//in watts
V=4400;//in volts
I=0.04;//in amperes
pf=W/(V*I);
disp(pf,'(a)No load power factor=');
I_w=I*pf;
disp(I_w,'(b)Iron loss component of current (in amperes)=');
I_m=I*sqrt(1-pf^2);
disp(I_m,'(c)Magnetising component of current (in amperes)')