С - Лаб 2 / graph1

clear, clc, close all
for i=1.0: 1.0: 9
disp(i);
uel(1,i)=250-10*i;
end
ueloe=uel/uel(1,3);
iel=[0.5 0.46 0.42 0.38 0.34 0.29 0.25 0.21 0.14];
ieloe=iel/iel(1,3);
uel=[213 200 187 174 158 140 126 106 77];
pcx=[49.2 45.3 41.6 38 34.4 33 26.7 22.1 15];
pcxoe=pcx/pcx(1,3);
eel=[420 385 365 342 320 289 262 225 160];
eeloe=eel/eel(1,3);
cosfi=[0.4 0.42 0.44 0.47 0.5 0.54 0.57 0.62 0.68];
fel=2*pi*pi*0.8*1.2*eel.*(acos(0.28)+0.5*sin(2*acos(0.28)));
feloe=fel/fel(1,3);
pel=iel.*uel.*cosfi;
peloe=pel/pel(1,3);
etacx=fel./pcx;
etacxoe=etacx/etacx(1,3);
kisk=pel./uel./iel;
etael=fel./pel;
etaeloe=etael/etael(1,3);
plot(ueloe,kisk);
xlabel('U_{EL5}, о.е.');
ylabel('K_{иск}, о.е.');
grid on