summaryrefslogtreecommitdiff
path: root/1760/CH1/EX1.38/EX1_38.sce
blob: 895ed2271147bdadab2642faff961c313d3a0dbc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
                    //EXAMPLE  1-38       PG NO-32
F=50;                     //Frequency
W=2*%pi*F;
disp('i)W  = '+string (W)+' rad/sec');
t=0.0025;                 //time
Vm=10;
A1=0.01;
A2=0.005;
i=[(A2*Vm^2)/2]+0.0707;
disp('ii)Current = '+string (i)+' A')