Реферат: Программа исследования функций

setfillstyle(1,1);

setcolor(14);

}

}

// Выводпункта

bar(10+100*n,5,105+100*n,25);

rectangle(11+100*n,6,104+100*n,24);

outtextxy(60+100*n,15,m.capt[n]);

}

// Опрос клавиатуры

do {

c=getch();

if (c==0) c=getch();

if (c==75) {

// Влево

vp--;

if (vp<0) vp=m.onum-1;

}

if (c==77) {

// Вправо

vp++;

if (vp>=m.onum) vp=0;

}

} while ((c!=75)&&(c!=77)&&(c!=13)&&(c!=27));

} while ((c==75)||(c==77));

if (c==13) return vp;

return -1;

}

// Ввод числа