//Caption:In a single phase transformer Find The magnetising current and The iron loss current 
//Exam:3.12
clc;
clear;
close;
p=acosd(0.22);//power angle(when power factor is 0.22)
I_o=0.3;//no load current(in Amp)
I_m=I_o*sind(p);//Magnetising current(in Amp)
disp(I_m,'Magnetising current(in Amp)=');
I_w=I_o*cosd(p);//Iron loss current (in Amp)
disp(I_w,'Iron loss current (in Amp)=');