Курсовая работа: Розвязок інтеграла методом Чебиша Гауса Сімпсона

if(c!=13) c=getch();

else c=32;

if(c==72) if(mi13==1) mi13=nm13; else mi13--;

if(c==80) if(mi13==nm13) mi13=1; else mi13++;

if(c==27){

for(i=0;i<nm13+2;i++){

gotoxy(ls/*12*/,i+3);

textattr(15 + (0 << 4));

cprintf("__________");

}

mi1=3;

goto l2;

}

if(c==107) exit(0); /* Alt-F4 - Вихiд */

if(c==59) zavdannja(); /* F1 - Допомога */

gotoxy(ls,3);

textattr(cr+ (ctf << 4));

cprintf("+--------+");

for(i=0;i<nm13;i++){

gotoxy(ls,i+4);

textattr(cr+ (ctf << 4));

cprintf("¦");

if(mi13==i+1) textattr(ct+ (ctfa << 4));

else textattr(ct+ (ctf << 4));

cprintf(m13[i]);

textattr(cr+ (ctf << 4));

cprintf("¦");

}

gotoxy(ls,nm13+4);