if (jj==29) {kk29=z2+xx29; uu1=29;};
if (jj==30) {kk30=z2+xx30; uu1=30;};
if (jj==31) {kk30=z2+xx31; uu1=31;};
if (fz2==1) {d2=1;};
if (fz2!=1) {fz2=1;};
};
};
if (ii>30)
{
ii=ii-15; //smes'henie
jj=jj-15;
uu1=uu1-15;
xx1=xx16;
xx2=xx17;
xx3=xx18;
xx4=xx19;
xx5=xx20;
xx6=xx21;
xx7=xx22;
xx8=xx23;
xx9=xx24;
xx10=xx25;
xx11=xx26;
xx12=xx27;
xx13=xx28;
xx14=xx29;
xx15=xx30;
xx16=xx31;
kk1=kk16;
kk2=kk17;
kk3=kk18;
kk4=kk19;
kk5=kk20;
kk6=kk21;
kk7=kk22;
kk8=kk23;
kk9=kk24;
kk10=kk25;
kk11=kk26;
kk12=kk27;
kk13=kk28;
kk14=kk29;
kk15=kk30;
kk16=kk31;
};
if (d2==1)
{
if (uu1-1==1) {kk=kk1;};
if (uu1-1==2) {kk=kk2;};
if (uu1-1==3) {kk=kk3;};
if (uu1-1==4) {kk=kk4;};
if (uu1-1==5) {kk=kk5;};
if (uu1-1==6) {kk=kk6;};
if (uu1-1==7) {kk=kk7;};
if (uu1-1==8) {kk=kk8;};
if (uu1-1==9) {kk=kk9;};
if (uu1-1==10) {kk=kk10;};
if (uu1-1==11) {kk=kk11;};
if (uu1-1==12) {kk=kk12;};
if (uu1-1==13) {kk=kk13;};
if (uu1-1==14) {kk=kk14;};
if (uu1-1==15) {kk=kk15;};
if (uu1-1==16) {kk=kk16;};
if (uu1-1==17) {kk=kk17;};
if (uu1-1==18) {kk=kk18;};
if (uu1-1==19) {kk=kk19;};
if (uu1-1==20) {kk=kk20;};
if (uu1-1==21) {kk=kk21;};
if (uu1-1==22) {kk=kk22;};
if (uu1-1==23) {kk=kk23;};
if (uu1-1==24) {kk=kk24;};
if (uu1-1==25) {kk=kk25;};
if (uu1-1==26) {kk=kk26;};
if (uu1-1==27) {kk=kk27;};
if (uu1-1==28) {kk=kk28;};
if (uu1-1==29) {kk=kk29;};
if (uu1-1==30) {kk=kk30;};
if (uu1-1==31) {kk=kk31;};
if (kk>=20)
{
if (kk>25)
{
if (kk>1000)
{
s2++;
};
if (kk<=1000)
{
s1++;
};
};
if (kk<=25)
{
e3++;
};
};
if (kk<20)
{
e2++;
rr=1000;
};
};
d1=0;
d2=0;
if (z3==0)
{
if (e3>0)
{
e3--;
z3=rnd_exp(10,6,0.1);
if (fz3==1) {s1++;};
if (fz3!=1) {fz3=1;};
};
};
//grafica
putpixel(100+t/8.86,440-s1,14);
putpixel(100+t/8.86,440-s2,12);
if (t_post>0) {t_post--;};
if (c1>0) {c1--;};
if (z1>0) {z1--;};
if (z3>0) {z3--;};
if (c2>0) {c2--;};
if (z2>0) {z2--;};
t++;
if ((s1+s2)==400) {goto FINISH;};
if (t==5000) {goto FINISH;};
goto START;
FINISH:
gotoxy(67,29); cout<<t;
getch();
}
int rnd_exp(double a, double b, double L)
{
++b;
double fd=10000;
double k=exp(0)-exp(-L);
Q:
double c=random(b);
double d=random(fd)/fd;
double p=exp(-L*(c))-exp(-L*(c+1));
if (d<=p/k)
if (random(2)==1) return(c+a);
else {if (c==0) goto Q;
else return (-c+a);};
goto Q;
}
Вывод
В ходе выполнения курсового проекта была проанализирована исходная схема объекта, выявлены ее недостатки, разработана новая – оптимизированная схема, написаны программы имитирующие работу участка до и после оптимизации до момента выпуска 400 шестерен вне зависимости от их сорта.
Оптимизированная схема разработана на базе уже имеющихся агрегатов. Она имеет потенциал увеличения суммарного времени обработки примерно в два раза, что исключает появление на выходе продукции второго сорта. При этом мощностные показатели объекта по выпуску продукции остаются прежними.
Список использованной литературы
1.Программирование и основы алгоритмизации: Метод. указания для курсового проектирования /сост В.С. Ратушняк, Ю.Н. Ратушняк.- Красноярск: КГАЦМ, 2004.- 54 с.
Уважаемый посетитель!
Чтобы распечатать файл, скачайте его (в формате Word).
Ссылка на скачивание - внизу страницы.