summaryrefslogtreecommitdiff
path: root/343/CH2/EX2.17/ex2_17.sce
blob: e25835f10779d4b879250f2046aefce16b966acb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
Im=62.35;
w=323;
function y=f(t),y=Im*sin(w*t),endfunction       //Defining Voltage Equation
fr=w/(2*%pi);
Irms=Im/sqrt(2);
Iavg=0.637*Im;
formfac=Irms/Iavg;
disp("Amperes",Im,"Maximum value of current")
disp("Hertz",fr,"Frequency");
disp("Amperes",Irms,"Rms value of current");
disp("Amperes",Iavg,"Average value of current");
disp(formfac,"Form factor");