JanuszV

B=150

E=[B+B*%i,(B+B*%i)exp(1/2%pi*%i),(B+B*%i)exp(%pi%i),(B+B*%i)exp(3/2%pi*%i)]

polarplot([0,%pi],[250,250])

for k=1:4

r= real(E(k));

i= imag(E(k));

plot2d4([0,r],[0,i])

end

E1=Eexp(-1/14%pi*%i)

for k=1:4

r= real(E1(k));

i= imag(E1(k));

r0=real(E(k));

i0= imag(E(k));

plot2d4([r0,r],[i0,i])

end

x='J%E%B%A%Ć%P%I%S'

strsplit(x,'%')

strcat(strsplit(x,'%'),'')