Курсовая работа: Нелинейные САУ

printf("%f",(-1/P_w_min));

setcolor(15);

for(w=0;w<=700;w=w+0.05){

if(((Kos*Ko-(To+Tpr)*w*w)*(Kos*Ko-(To+Tpr)*w*w)+

(w+Tpr*Kos*Ko*w-To*Tpr*w*w*w)*(w+Tpr*Kos*Ko*w-To*Tpr*w*w*w))!=0){

P_w = KmasX*(Ko*w*Tg*(w+Tpr*Kos*Ko*w-To*Tpr*w*w*w)+

(Kos*Ko*Ko-(To+Tpr)*Ko*w*w))/

((Kos*Ko-(To+Tpr)*w*w)*(Kos*Ko-(To+Tpr)*w*w)+

(w+Tpr*Kos*Ko*w-To*Tpr*w*w*w)*(w+Tpr*Kos*Ko*w-To*Tpr*w*w*w));

Q_w = KmasY*(Tg*(Kos*Ko*Ko*w-(To+Tpr)*Ko*w*w)-

Ko*(w+Tpr*Kos*Ko*Ko*w-Ko*To*Tpr*w*w*w))/

((Kos*Ko-(To+Tpr)*w*w)*(Kos*Ko-(To+Tpr)*w*w)+

(w+Tpr*Kos*Ko*w-To*Tpr*w*w*w)*(w+Tpr*Kos*Ko*w-To*Tpr*w*w*w));

lineto(Xc+P_w,Yc-Q_w);

};

};

setcolor(13);

circle(Xc-KmasX,Yc,2);

circle(Xc-KmasX,Yc,1);

putpixel(Xc-KmasX,Yc,13);

outtextxy(Xc-KmasX-7,Yc-12,"-1");

setcolor(15);

if (err==1){

if (x==0) outtextxy(10,10,"Tpr = 0.01");

if (x==1) outtextxy(10,10,"Tpr = 0.09");

if (x==2) outtextxy(10,10,"Tpr = 0.2");

if (x==3) outtextxy(10,10,"Tpr = 0.5");

if (y==0) outtextxy(10,30,"Ko = 10");

if (y==1) outtextxy(10,30,"Ko = 100");

К-во Просмотров: 872
Бесплатно скачать Курсовая работа: Нелинейные САУ