diff options
Diffstat (limited to '3802/CH7/EX7.2/Ex7_2.sce')
-rw-r--r-- | 3802/CH7/EX7.2/Ex7_2.sce | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/3802/CH7/EX7.2/Ex7_2.sce b/3802/CH7/EX7.2/Ex7_2.sce new file mode 100644 index 000000000..481ba6eb0 --- /dev/null +++ b/3802/CH7/EX7.2/Ex7_2.sce @@ -0,0 +1,26 @@ +//Book Name:Fundamentals of Electrical Engineering
+//Author:Rajendra Prasad
+//Publisher: PHI Learning Private Limited
+//Edition:Third ,2014
+
+//Ex7_2.sce.
+
+clc;
+clear;
+Np=1000; //number of Primary turns
+Ns=200; //number of secondary turns
+Io=3; //No load current in A
+cos_phi_not=0.2; //lagging
+Is=250; //secondary current in A
+cos_phi_s=0.8; //lagging
+
+Is_dash=Ns*Is/Np;
+phi_s=(acosd(0.8));
+phi_not=(acosd(0.2));
+Ip_cos_phi_p=(Is_dash*cos_phi_s)+(Io*cos_phi_not);
+Ip_sin_phi_p=(Is_dash*(sind(phi_s)))+(Io*(sind(phi_not)));
+Ip=sqrt((Ip_cos_phi_p)^2+(Ip_sin_phi_p)^2);
+printf("\n Primary current=%2.2f A\n",Ip)
+
+phi_p=atand((Ip_sin_phi_p)/(Ip_cos_phi_p));
+printf("\n Power factor=%1.3f lagging",cosd(phi_p))
|