summaryrefslogtreecommitdiff
path: root/1067/CH44/EX44.03/44_03.sce
blob: 94ad9a3a4b6a851ff5d82dbcbc8fd231992fd21d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clear;
clc;
v=1;
p=.91;
y=acosd(-.91)-180;
y=round(y*10)/10;
i=v*%e^(y*%i*%pi/180);
x=.37*%e^(%i*%pi/2);
e=v+(i*x);
e=round(e*100)/100;
p=abs(e/x)*v;
mprintf("the steady state limit=%fp.u.",p);
a=atand(imag(i),real(i))