blob: d9e3801434894f115715e2850574cef27b335962 (
plain)
1
2
3
4
5
6
7
8
9
10
|
clc
w1=3000 //Assigning values to parameters
w2=5000
t=atan(sqrt(3)*(w2-w1)/(w1+w2))
pf=cos(t)
p=w1+w2
il=p/(sqrt(3)*vl*cos(t))
disp("Watts",p,"Total Power supplied is")
disp(pf,"Power factor is")
disp("Amperes",il,"The line current is")
|